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SPECIALLY TARGETED. Works in harmony with your 
z-card/cpm equipped Apple II. No more floppy shuffle. 
Fast one pass compiler that doesn’t generate 
unnecessary intermediate files which require further 
assembly. 

PROFESSIONALLY DESIGNED. Crafted by a project 
team with over 15 years of Pascal programming 
experience. A powerful Pascal that includes all thè 
features necessary for professional program 
development including random files and dynamic 
strings. 

INCREDIBLE SPEED. Resultant stand alone programs 
execute 10-20 times faster than thè equivalent Basic or 
up to 4-1/2 times faster than U.C.S.D. programs. 

TRADEMARK 

CPM Digital Research 

Apple Apple Computers 

UCSD University Calif. San Diego 

Alcor Pascal Alcor Systems 


POWERFUL TEXT EDITOR. Has Macro capability, 
reconfigurable and understands smart terminals. 

EXCEPTIONAL DOCUMENTATION. Includes 250 page 
documentation pkg. that guides you step by step. 

OPTIONAL ADVANCED DEVELOPMENT PKG. Includes 
Optimizer and Native Code Generator for even faster 
executing programs. ADP: $125 + shipping. 

ALCOR PASCAL: A new standard of excellence from 
thè professionals at Alcor Systems. 


CALL OR WRITE for a free 20 page technical brochure 
with all thè facts. 214-226-4476. Pascal System: $199 + 
shipping. / —, 



Alcor Systems 
800 W. Garland Ave. 
Garland, Texas 75040 
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pensuin software 


The criminal element hasfrun amok. 


Can you round theni up? 


i 


We believe games should be fun and that thè price of games sliouldn’t dampen that fun.The growth of 
thè market over thè past couple of years leads us to believe that $19.95 may work nowias a reasonable 
game price, so we’re trying it for thè next six months, and if we’re right. longer. This pòlicwdoes not just 
apply fo new games, but to ALL our games, including our^past and curr^ent best-sellersnCpir bW is that 
we’ll seti more and that thè increased sales will offset thè decreased income per produci If so, more 
people get to play our games, and ^ve stili make enough to keep developing newer and bettemoftwàre. 

As’our customers know, at Penguin Software we take a great deal of care and pride in otnyprqjlucts. 
This change in our pricing in no way affects our standards of quality. We pioneered thè remigai of copy- 


protectibn from applications software last year iman effort to give you a better product. This yeàr we are 
trying àgain to lead thè way in putting thè customer first. *•« 

.7 * • I 
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(312) 232-1984 830 4th Avenue, Geneva. IL 60134 


Dealer Hotline: (800)323-0116, retailers only, please. 


Available at your locai computer store^bealer and distributor inquiries welcome. Visa/ MasterCard accepted. 






DEPARTMENTS 


Hot Cider 

hi/ Wayne Green 

Inside Out 

Highlight.s of thè issue 

Fermentations 
Editorial 
Letters 
Applewatch 


28 

42 

150 

158 

166 

170 

176 


184 




Mav 1983 
Voi. 1 No. 5 


Downloaded from wwwApple 2 Online.c 0 m 


ARTICLES 


10 

12 

16 

21 

Congress balks on Apple bill: Custer axed: 
Apple's image polished; Auto-parts industri' 
computerizes: Apples moribund?! 

The Applesoft Adviser 

Modules for random access files 

The Assembly Advantage 

Integer arithmetic with SPEED/ASM 
Bent on Business 
Put vour Apple on salary 

Fudge It! 

N'oisv graphics 

Book Reviews 

Ill’s Company 

An introduction to Apple surgerv 
Hints ‘rT Techniques 
Remark reniinder; Renumber fix; 

Move iti: The wily hex 
SoftwareReviews 
The Cosmic Balance: Spitfire Simulator; 

Know Tour Apple: Sargon II: Wargle; 

Academic Skill Builder; Casino; Jawbreaker 

Calendar 197 

New Software 198 

Cider Vinegar 203 

New Products 204 

Cover art by Bob Dukette. 


Blaising Bibliographies 
Partii _ 

Pascal puts it all together 
by James Fiorini 

Indy 


64 


74 


Luxury Lapping 
by Earl Johnson 

Solving Problems 
With Logo 
PartH 

Streamlining thè hiring process 

by Greg Stone 

The Better One-Day 
Programmer _ 90 

Making memories 
by Joe Magee 

Practicallv Pascal 

Esili_100 

Two nifty file routines 
by John Stephenson 


A Pascalian Puzzle 

Classical Perplexity 
by Swain Pratt 

Bank Street Writer 

Review (word processing) 
by Hartley Lesser 

Input Insult 


First, GET its attention 
by M. Max McKee 


.120 

.126 

234 


The Franklin Ace 100 


.138 


How does it stack up? 
by Timothy Daniel 

Poking Perfection 

Partii _142 

Towards better screen formatting 
by A. E. Doughty 

CP/M: The Lingua Franca 
Of Operating Systems _146 

Your computer s resident workhorse 
by John Davidson 



A Pascalian Puzzle, p. 120. 

inCidvr (ISSN pending) is published 12 tirnes a year by 
1001001 Ine.. 80 Pine Si.. Peterburough, NH 03458. Pilone: 
603-924-9471. Second class postagc pending at Peterbor- 
ough, NH. and additino al mailing offices. Subscription 
rates in U.S. are $25 for nne year and S53 for three ycars. In 
Canada and Mexico. 827.97—one year only. U.S. fiuids 
drawn on a U.S. bank. Canadian distribntor: Micro Distri- 
huting, 409 Quecn St. West. Toronto. Ontàrio, Canada 
M5V 2A5. BC Canadian distributor: Graymar Data Ser¬ 
vices. Ltd., #4 258 E. lsl Ave.. Vancouver. BC V5T 1A6. 


Sargon II review. p. 188. 

Foreign suhscriptions (surface inail). $44.97—one year on¬ 
ly. U.S. funds drawn on a U.S. bank. Foreign subseriptions 
(air muil). please influire. In South Africa contact iiiCidrr. 
P.O, Box 782815. Sandtun. South Africa 2146. All U.S. and 
Canadian suhscription correspondence should he addressed 
to inCidcr. Subscription Department. P.O. Box 911. Farni- 
ingdale. NV 11737. Please include your address label with 
any correspondence. Post master: Send address changes to 
inCider. Subscription Services, P.O. Box 911. Farmingdale. 
NY 11737. E ut ire contents copyright 1983 by 1001001 Ine. 


4 Èider Mav 1983 

































































RAVEN, an experimental Agvav Unit, is Earth’s only 
defense against thè Imperiai Arcturan Armada. Com- 
manding RAVEN, you will face Arcturan Laser Tanks, 
Pulsars, Sandsleds, Assault Batteries, Prowlers, Skim- 
mers, Seekers, Guise Mines, and thè rest of thè ram- 
paging Arcturan Assault. Your wits and RAVEN’s bi- 
phasal Thunder Cannon are all that stand between a 
helpless Earth and thè wrath of thè Arcturan Armada. 

THE 

ULTIMATE 

-D 

ACTION ARCADE GAME! 

Fast 100% 

Machine Language. 

Requires Apple 11,11 ■ or Ile' 


SOFTWARE ENGINEERING CORPORATION intro- 
duces STELLAR 7, an innovative 3-D arcade game 
by Damon Slye. 

STELLAR 7 features smooth HI-RES animation, a 
colorful instrument panel, and 7 unique levels, each 
level more challenging than thè last. 

For Ordering send $34.95 plus $2.00 shipping and 
handling to: SEC 

P.O. BOX 10854 
Eugene, Oregon 97440 
Or CALL TOLL FREE 

1 - 800 - 547-8009 

in Oregon cali 1-503-342-1298 

VISA-MASTERCHARGE Welcome 

Dealer Inquiries Invited. 

/GCond to none! 
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Hot Cider 


Remarks from thè Publisher. . . 

Wayne Green 


It’s a tough world out there in thè 
marketplace, but at least for thè mo¬ 
ment, Apple seems to have thè lead in 
microcomputer sales. Much of 
Apple’s future relies on thè reception 
of their new models and thè market¬ 
ing support given them by thè firm. 

With thè bulk of thè 1982 sales be- 
ing thè Apple II, a computer that in 
most respects was almost five years 
old, thè need for a newer model was 
bordering on desperate. Sinclair 
showed one way to get costs down: 
reduce thè chip count in thè com¬ 
puter with specially designed large 
scale integration chips. 

The Apple Ìli never really got go- 
ing in sales, mostly due to its early 
problems, so an update on that was 
overdue. 

With thè introduction of a barrage 
of low end computers at CES, there is 
much market interest in under-$200 
computers and much speculation 
about whether Apple is going to ad- 
dress this market or leave it to others. 

Now, before you fall into thè usuai 
“toy” trap. . . our microcomputers 
have been ealled “toys” by minicom¬ 
puter firms for thè last seven 
years. . . let me digress (as usuai) and 
put things in perspective. 

Let’s say that I’m running a shoe 
store with four or five clerks. I want 
to have a desktop computer to keep 
track of thè inventory. Now, am I go¬ 
ing to buy a $2000 or so computer for 
each of thè clerks to access thè inven¬ 
tory data? Or am I more likely to buy 
a $200 miniature computer for each 
of them, with perhaps one host com¬ 
puter to manage database? 

We have dose to 30 people in thè 


ad sales department at Wayne Green 
Ine. Now, are we likely to spènd 
$2000 or so each for a microcomputer 
($60,000 total) for a Communications 
network of ad sales information? Or 
are we likely to set up a host com¬ 
puter with 30 terminals (miniature 
computers) at $100 each to access thè 
database and provide Communica¬ 
tions. . .total cost perhaps $5000. 

Once you start looking at thè situa- 
tion, you can see that for every use of 
a $2000 computer you have a bunch 
of applications for a low cost com- 


"... Apple's future relies on 
thè reception of their new 
models and thè marketing 
support given them... " 


puter with terminals. No, youTe not 
likely to use them for data input or to 
run a 30-megabyte disk, but you’d be 
foolish to buy more power than you 
actually need for thè terminals. 

Will Apple abdicate this enormous 
market to Texas Instruments, Timex 
and Sanyo? 

Radio Shack has so far skated up to 
thè edge of this low end market with 
their Color Computer, now selling 
for $250. A reduction in chip count 



should allow them to get down under 
$200 and stay competitive. Radio 
Shack has let Timex, T.I. and Com¬ 
modore get ahead of them in outlets, 
with thè result that thè other firms 
have some advantages in economies 
of scale. Thus, unless Radio Shack 
makes some basic changes in market¬ 
ing, we may see them continuing to 
lose market share. 

The new Lisa looks as if it will be 
healthy competition for thè Altos, 
Northstar, Vector Graphic and Cro- 
memeo end of thè desktop computer 
market, but I suspect that thè great- 
est growth will inevitably be in thè 
low end. 


□ 


I got a cali from a chap who only 
recently got involved with comput¬ 
ers. He worked a while for a software 
house, then decided to go into busi¬ 
ness for himself. He ran a third page 
ad in thè first issue of inCider and 
pulled in over $35,000 in sales. I 
didn’t want to get him all excited, but 
if he keeps that up, which is more 
than likely, he’ll gross over $500,000 
for this year. First-ad sales almost in- 
variably pulì in less than continuing 
advertising. And if we apply thè nor- 
mal rule of thumb, this would make 
his firm already worth over $1 mil- 
lion if he wants to sell it. Not bad. 
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On Apple® Software & Accessories... 

... without sacrificing on prompt delivery or quality Service. Micro Mountain sells 
everything at prices substantially less than thè manufacturer’s list. Since we 
maintain such a large inventory (1000’s of items in stock) most orders can be filled 
and shipped within 24 hours after you order. And, because Micro Mountain is one of 
thè largest retail distributore of Apple® Software in thè world, we will be here should 
you need Service at anytime after you receive your order. 

So, if you’re interested in— Low Prices, Prompt Delivery AND Quality Service, 
SHOP AT ... 


Mmm, 
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mountain 

FRANKLIN COMPUTERS 


NOW WE 
CARRY 


CALL FOR THE 
BEST PRICES! 


OMEGA tf/'ntyt 

Locksmith . 

TAXAN — 12" AMBER 4 **rn 

Monitor. 

EASTSIDE SOFTWARE 

Wild Card .^lOy 50 

MICRO LAB ^ 

Tax Manager .* 

KENSINGTON MICROWARE £«4 

Visicalc 3.3 .^I»/ 50 

“Solo’ Disk Drive . $ 279 50 

SPINNAKER (triA rn 

Rhymes & Riddles . 

System Saver S65 50 

- ASK FO R FREE CATALOC- 

3 * 

Any order 
of 3 or more 
programs entitles you to 
your choice of Originai 
Adventure Game or Applesoft^ 

Tutorial on disk FREE! 


SILICON VALLEY m rn 

List Handler .W 50 

STRATEGIC SIMULATIONS tjlwrn 

Bomb Alley.W 50 

Micro Modem II J277 50 

$2755° 
$ 265 ° 
$5950 

>139 50 

$ 2195 ° 


DOW JONES 

Market Analyzer 

EDU-WARE 

Alegebra IV 

VISTA 

16K Ram Card . 

SILICON VALLEY SYSTEMS 

Word Handler .. 

MICROSOFT 

Multi Pian . 


PHONE IN 
YOUR ORDER 
—TOLL FREE— 
(800) 854-5649 

Washington State residents 
see phone numbers in 
Order Blank at Right. 

ORDER PHONE HOURS: 

Mon.-Fri. 9 to 6 (PST) 
Sat. & Sun. 10 to2(PST) 


BE SURE TO ADD $2.50 SHIPPING AND HANDLING FOR ALL 
SOFTWARE ORDERS. ADD ADDITIONAL $3.00 FOR BLUE LABEL 
(Air). SHIPPING ON HARDWARE ITEMS-EXTRA. Washington 
residents add 6Vt% sales tax. We accept MASTERCARD, VISA and 
AMERICAN EXPRESS. C.O.D. s add $5.00. 


NAME 



STREET 



CITY 

STATE A 7IP 


GARD * 

EXP DATE 


SIGNATURE 




14517 N.E. 169th ST., WOODINVILLE, WA 98072 
! ORDER PHONE — Outside Waah. — (800) 854-5849 
Wash. Residents & Cust. Service (206) 483-2000 


PRICES SUBJECT TO CHANGE WITHOUT NOTICE 
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Our 80 Micro has generateci hun- 
dreds of millionaires so far, with 
more coming along every month. 
Now I think we’ll see inCider doing 
thè same for Apple aficionados. The 
opportunities are there, if you have 
thè background and thè guts to take 
advantage of ’em. 

Now, while thè microcomputer in- 
dustry, which has been growing reg- 
ulàrly at a 200 to 300 percent rate per 
year for seven years, is particularly 
forgiving, there is stili a need for 
some background before you make 
thè plunge. You do have to remem- 
ber that 8 percent of small businesses 
manage to fail, usually due to a lack 
of expertise on thè part of thè en- 
trepreneur. 

College? Right? Maybe, if you can 
find thè right one. . . though I honest- 
ly don’t know of any that are geared 
for thè needs of thè 1980’s. Sadly, our 
colleges are, for thè most part, a trap. 
They aim their graduates at either 
nothing in particular (liberal arts) or 
at three major categories of jobs that 
guarantee relative poverty for life: 
government, big business and teach- 
ing. This is thè reason that I’m work¬ 
ing towards starting up a college that 
will be geared to today’s needs, fur- 
nishing a technical and a strong busi¬ 
ness education. 

I can just see hundreds of comput- 
erists out there, kicking thè dirt, look- 
ing shifty-eyed, and mumbling about 
how much work is involved in start¬ 
ing a new firm. . . and what produets 
are needed, anyway? Yep, starting 
your own firm is a lot of work, no 
question about that. But thè rewards 
are all out of proportion to thè effort 
involved. Remember that even thè 
president of Tandy doesn’t make $1 
million a year. . .yet by generating 
another $35,000 a month in sales you 
can outdo this chap. . . and without 
all those stockholders ready to can 
you if something screws up. 

Before you start mortgaging your 
house to start a business, let me offer 
some avuncular advice. Know thè ter- 
ritory before you gamble. Work for 
someone else until you really know 
thè ropes. Only an idiot tries to leam 
on his own money, and that accounts 
for thè majority of thè 80 percent fail- 


ure rate of small businesses. Why 
throw your own money away getting 
an education when there are almost 
an infinite number of small firms that 
will pay you while you learn. Learn 
on their money, not yours. 

Now, about those needed produets 
that you couldn’t think of. Golly, I 
don’t know what is so difficult about 
that. Just give thè matter some 
thoùght! Take these new $100 com¬ 
puter, for example. Golden oppor- 
tunity for you. All you have to do is 
come up with a networking hard¬ 
ware/software System so a bunch of 


"Sadly, our colleges 
are, for thè most 
part, a trap." 


these can be used with an Apple host 
computer. Why should small offices 
use $3000 computer systems for every 
desk when a $100 computer terminal 
will do most of thè work adequately 
when connected to a larger System 
that Stores thè data and programs? 

If you’re into hardware, think 
about thè possibilities of uninterrupt- 
able supplies for thè low end com¬ 
puter. What about a light pen inter¬ 
face that will allow magazines to 
print thè table of contents in bar code 
and have it read into a computer for a 
reference? Or a bar code reader and 
printer System for coding books in a 
library. . . home, business or lending? 
Or even better, a bar code System for 
records for thè home or broadcast 
station? 

Once you get thinking about need¬ 
ed hardware and software produets, 
there is just no end to it. So, are you 
going to be reading about all thè peo- 
ple who got rich during these frantic 
years of thè microcomputer... or are 
you going to be one of thè people sail- 
ing around thè world on their yachts 
about ten years from now? You will 
never find a better time to get 
rich. . . or an easier industry in which 
to do it.B 
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for demanding graphics 
or text display. 


For high resolution (560H X 240V) color graphics, you cani 
beat thè Amdek Color-ll Monitor. And if you're looking for 
economy, thè Color-lll Monitor with 260H X 300V 
resolution is a superò buy. 

Both monitors feature RGB video input for computer control- 
led color ... and Amdek’s easy-to-install Digital Video Multi- 
plexor (DVM) board permits interface with thè most popular 
80 column boards. 

Just cali, or write for full details. 


Color-ll Monitor has RGB input and 560(H) X 240(V) 
line resolution. 

Color-lll Monitor has RGB input and 260(H) X 300(V) 
line Resolution. 

Digital Video Multiplexor (DVM) assures color graphics 
interface with most popular 80 column boards, such as: 
Videx “Videoterm”, Advanced Logic “Smart-term”, 
M&R “SUP ‘R’ TERMINAL”, Bit-3 Computer Corporation 
“FULL VIEW-80”, and thè “Doublevision" boards. 


2201 Lively Blvd. • Elk Grave Village, IL 60007 
(312)364-1180 TLX: 25-4786 


CORR 


Amdek 


your guide to innovative computing! 
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What’s New 
This Month? 


Welcome to thè May issue of 
inCider. In our cover article this 
month auto racing enthusiast Earl 
Johnson shares a program designed to 
chart thè Indianapolis 500, thè major 
event in American auto racing. And 
Johnson’s Indy Program can be 
adapted easily for other types of 
races—like a locai marathon race— 
as well. 

This magazine endeavors to pro¬ 
mote a perfect marriage of hardware 
and software for thè Apple com¬ 
puter. But, for better or worse, 
jealous competitors bave invaded Ap- 
ple’s ground. A growing number of 
machines incorporating thè 6502 mi¬ 
croprocessor will, with varying suc¬ 
cess, run programs written for thè 
Apple II. Tim Daniel recently put thè 
Franklin Ace 100 through its paces, 
and offers his view of this alternative. 
Hartley Lesser, after chatting with 
an Apple attorney, gives his opinion 
in thè Fermentations column. So 
what does this mean to you? Lower 
prices and high quality, or third-rate 
Apple copies that accept commands 
only if they’re in thè Applesoft dialect 
of Ghinese? We’ll bé bringing you thè 
latest in this struggle as it happens. 

Greg Glau, author of thè Bcnt on 
Business column, didn’t want to 
spend $400 on payroll software. And 
so he wrote his own payroll program. 
Unfortunately, it could not separate 
data by quarters. Then he discovered 
thè subject of this month’s column— 
double-dimension arrays. 

In Part II of Blaising Bibliogra- 
phies, James R. Fiorini continues his 
discussion on using Pascal programs 


to create bibliographies. And John 
Stephenson shows how two handy 
Pascal file routines can help you write 
an address book. 

Bill O’Brien, author of thè IIFs 
Company column, decided to tinker, 
inside his Apple III. And he found 
some problems beneath thè cables 
and thè connectors. For those of you 
who are thinking of doing repair 
work on thè Apple III, Bill provides 
step-by-step instructions on how— 
and how not—to dismantle your 
machine. 

Starting this month John David¬ 
son begins a tutorial series on thè 
popular operating System, CP/M. 
Learning to use CP/M offers porta- 
bility and compatibility that will cer- 
tainly expand thè versatility of your 
Apple. And Don Fudge, our graphics 
expert, discusses how to unite graph¬ 
ics and sound to create an originai 
game program. 

Blaise Pascal, a master of structure 
and form in mathematics and name- 
sake of thè programming language, 
discovered and proved a theorem that 
is one of thè comerstones of projective 
geometry. Swain Pratt deciphers this 
Pascalian puzzle for thè mathematics 
buffs among our readers. 

In Solving Problems With Logo, 
Greg Stone uses this powerful Lisp- 
like language to eliminate much of 
thè labor involved in reviewing and 
evaluating job applicants. For game 
enthusiasts, six new games are re- 
viewed in thè back of thè magazine. 

Watch for our June issue which 
covers èvery aspect of telecom- 
munications. ■ 
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Fcrmentations 

by Hartley G. Lesser 




On thè Warpath 


T here hasn’t been mach press 
lately concerning Apple’s at- 
tempts to legally blockade copy-cat 
computer systems. A maneuvér by 
Apple to enjoin Franklin Computer 
Corp.’s distribution of their Ace com¬ 
puter, based on alleged copyright 
violation, has failed in Philadelphia 
Federai Court. The absence of a con- 
tinued visible assault by Apple on thè 
work-alikes prompted me to pursue 
thè matter with Daniel G. Wendin, 
Associate Counsel for Apple Com¬ 
puter. He assured me that Apple is 
not taking lightly thè domestic 
production of Appiè work-alikes or 
thè importation of foreign copies into 
thè U.S. 

Look-alikes, trading on thè Apple 
name and sold to unsuspecting mail- 
order comsumers as Apple comput- 
ers, are a threat to Apple’s reputa- 
tion. According to Wendin these in- 
ferior copies are being smuggled into 
thè U.S. from Taiwan in large num- 
bers. Court action is sought to rein- 
force Apple’s efforts to stop them at 
thè border. 

Work-alikes, such as thè Ace, in- 
habit hazier territory. The law is 
unclear on this question of copyright. 
Where ROM comparisons and other 
technical considerations further com¬ 
plicate thè case, a binding decision is 
particularly hard to get. Judge New- 
comer, when he denied Apple’s pre- 
liminary request for an injunction 
against Franklin, stated he was un- 
able to determine thè law and desired 
a full trial to decide thè issue. Apple 
has appealed thè decision to thè 
Third Circuit Court of Appeals and is 
confident of a reversai. 


But thè focus of Mr. Wendin’s at- 
tention is squarely upon thè island of 
Taiwan. He stated that 85 to 90 per- 
cent of all Apple II copies are shipped 
from Taiwan, with many being sent 
to Singapore and Hong Kong in an 
attempt to further cloud thè supply 
route. Apple is claiming success in 
both Hong Kong and Singapore, 
thanks to stiffer locai laws dealing 
with copyright and patent infringe- 
ment. Agents for Apple purchase thè 
copies and gain supplier information; 
armed with this information, Apple’s 
attorneys have been able to obtain 
court orders against thè suppliers. 
These tactics have brought thè prob- 
lem there under control, Wendin 
stated. 

Taiwan is a different story, how- 
ever. Some reai problems remain 
there, thè Apple counsel admitted, 
and Apple has been able to ac- 
complish little on thè island. For- 
tunately, Apple and U.S. Customs 
have a dose working relationship, ac¬ 
cording to Wendin. Apple has trained 
personnel on cali to assist U.S. Cus¬ 
toms in checking suspicious ma- 
chines. Copies brought in by in¬ 
dividuate are frequently seized by 
Customs officiate, and stiff fines are 
assessed; these measures serve as an 
effective deterrent against thè flood 
of imports by individuate. But thè 
problem of undetected bulk ship- 
ments remains. 

Apple is currently investigating 
mail-order firms who advertise Apple 
copies. Truth-in-advertising laws are 
ateo being researched as another 
means of bringing pressure upon 
copy promoters. 



A hearing scheduled before thè In¬ 
ternational Trade Commission will 
determine Apple’s right to exclude 
copies on patent grounds; more than 
20 respondents have been named. 
Mr. Wendin hopes for a positive 
judgement within four months to a 
year. This would reinforce Customs’ 
right to deny importation. 

Taiwan ateo exports a good per- 
centage of their Apple copies to 
Europe. Germany and Italy have 
their own manufacturers, perhaps 
with Taiwanese components, but thè 
operations are mostly covert. 

Until recently thè Apple II imita- 
tions presented a widespread and 
irrefutable challenge to thè originai. 
But where litigation failed, product 
development may succeed. Wendin 
pointed to a brand new Apple Ile on 
a table to his right. “This changes 
things,” he said, as a broad grin 
creased his face. “Their Apple II 
copies won’t sell so well anymore.” 

Which may be quite true. After 
all, why bother with a cheap Apple II 
Plus copy when you can buy thè up- 
graded Ile with 64K RAM and upper/ 
lowercase? Granted, thè copies’ low- 
er price will continue to tempt con- 
sumers. But a buyer concerned about 
warranties, product reliability, pe- 
ripheral compatìbility, and thè future 
of American industry will find thè Cu- 
pertino machine more attractive. 

Apple hasn’t licked thè problem. 
But just because there aren’t any 
headlines annòuncing injunctions, 
fines and arrests, don’t believe for 
a second that Apple isn’t going after 
thè troublemakers. Apple is on thè 
warpath! ■ 
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One Apple 
and $ 1,575 

can make alotof pies. 

And charts. And graphs. 


Introducine thè New Personal 
Computer Plotter from || 

Hewlett-Packard 

Now you can use your Apple® com- 
puter to generate your own presentation 
charts, graphs, and pie charts. How? ' , 

Simply add on thè new high W** 

quality, low cost HP 7470A 
Personal Computer s ' 

Plotter. \ 

The 7470A helps you 
save time, save money, and, \ 

lets you communicate quickly, accu- y 

rately and effectively. —_ 

The eye is faster. 

Data, when visualized graphically, becomes informa- 
tion fast. Charts and bar graphs can make any presenta¬ 
tion clearer and more readily understood. But asking your 
staff to produce thè graphics 
for your next presentation 
doesn’t ensure accuracy or 
artistic talent. And going to 
outside suppliers can be 
costly. Combined with your 
Apple® computer, thè new 
HP 7470A plotter does thè 
communicating for you. 

Quickly. Logically. And with 
off-the-shelf software. 

Fast and pretty. 

The 7470A gives you high plotting speed with excellent 
line quality...faster than any competitive small plotter. 
On top of all that, it comes in an attractive design 
package that looks nice on your desk. And it does it 
for only $1,575. (U.S.A. domestic suggested retail price.) 


I Count on it. 

jA The 7470A is built thè Hewlett- 
H Packard way. To last. Designed and 
■ engineered with only a few parts, none 
| of which require adjustment. And with 

II 5 - r = “ ! customized integrated circuits 

jj JSP —— x\ ^hat ensure reliability. 

—^ The HP 7470A has 

.77-7- two single-pen stables 

I that output multi-color plots in 

, j your choice of ten coordinated colors. Pens 
I are automatically capped and stored. 

1 An option youll want, too. 

For only $95, you can also get a 17057 Overhead 
Transparency Kit that tums your plots into transpar- 
encies for overhead projectors. For “I need it tomorrow 
at 9:00 A.M!” meetings, it’s a necessity. 

Start plotting your next presentation today. 
Clip and mail thè coupon below. Now. 

Mail thè coupon below and we’ll send you—absolutely 
free—a sample plot, a more detailed brochure, and a 
sample overhead transparency. 

Then... stop in at your nearest Hewlett-Packard 
Dealer. See thè HP 7470A in action. Once you see it 
demonstrated you’ll find a hundred ways to make your 
own Apple® pies. And charts. And graphs. 


When performance must be measured by results 


Whal HEWLETT 
mLUM PACKARD 


Seeing is believing. Send me a sample plot, an overhead transparency, and more detailed information. 

Name_______Title---1- 

Company ------_------- 

Address___ 

City, State & Zip__—.—----- 

Phone Number ( )----— -— --—-— 

Send to: Hewlett-Packard, 16399 W. Bernardo Drive, San Diego, CA 92127—Atta: Nancy Carter 


Apple is thè registered trademark of Apple Computer, Ine. 
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THE GRAPPLER + FEATURES: 

• Dual Hi-Res Graphics • Printer 
Selector Dip Switch • Apple III 
Compatible* • Graphics Screen 
Dump • Inverse Graphics • 
Emphasized Graphics • Doublé Size 
Picture • 90° Rotation • Center 
Graphics • Chart Recorder Mode 

• Block Graphics • Bell Control 

• Skip-over-perf • Left and Right 
Margins • Variable Line Length 

• Text Screen Dumps • also works 
with Pascal and CP/M " 

THE GRAPPLER + INTERFACES 
WITH THE FOLLOWING PRINTERS: 

• Anadex • Apple Dot Matrix 

• Centronics 122 • C. Itoh ProWriter 

• DMP-85 • Epson Series* * • IDS 
460, 560, Prism 80 and 132, 
Microprism • NEC 8023 • Okidata 
Series* * • Star Micronics Series 

• and many other printers 

j^Orange fTìicro 

1400 N. Lakeview Ave., 

Anaheim, CA 92807 U.S.A. 

(714) 779-2772 Telex: 183511 CSMA 

Foreign Dealer Inquiries Welcome 


COMPLETELY REDESIGNED. 

NOW, THE GRAPPLER +. 

The originai Grappler was thè first 
graphics interface to give you hi-res 
screen dumps from your keyboard. 
The new Grappler + with DualHi-Res 
Graphics adds flexibility with a 
side-by-side graphics printout of 
page land page 2. 


The Grappler + can now be used 
with thè Apple' Dot Matrix, 
thè Okidata 84, and is Apple III 
compatibleTIn addition, thè IDS 
Grappler + iscurrently available 
with color capability, including 
color graphics screen dumps. 


UP TO 64K BUFFER OPTION 
An optional Bufferboard can now 
be added to all existing Grappler 
and Grappler + interfaces. See 
your Apple Dealer for details. 


'Requires additional software driver. 
•Requires graphics upgrade. 


© Orange Micro, Ine. 1982 


CP/M is a registered trademark of Digital Research, Ine. 
Apple is a registered trademark of Apple Computer, Ine. 


ACTUAL APPLE II PRINTOUT USING GRAPPLER AND EPSON MX100 


WithThe 


Printer Interface 


Cìrcle 5 on Reader Service card. 






















If yotir printer uses yottr Apple 
more than you do, 
you need The Bufferboard. 




If your Apple is locked into thè “PRINT" 
mode so much that you've taken up soli- 
taire to kill thè boredom, you need a 
buffer. And if your computer is thè Apple 
II or III, thè only buffer for you is The 
Bufferboard. Expandable to 64K of Stor¬ 
age, The Bufferboard Stores an instantane- 
ous bucketful of print data from your 
computer. Then it feeds thè data to your 
printer at its own printing rate. Your Apple 
is set free from driving your printer and is 
ready for more data from you. 


Take your existing interface— 
and buffer it! 

Only The Bufferboard has a simple 
Interface-Docking System. No bulky boxes 


memory chips. This "bucket" will hold up 
to 20 pages of a print job, allowing you 
freedom to use your Apple. 

The Bufferboard—designed 
exdusively for thè Apple Computer. 

Specifications: 

• Versions for Grappler + interface, Epson 
interface, Apple interface, and other popo¬ 
lar printer interfaces • 16K buffer standard 

• Upgradeable to 32K or 64K • Automatic 
memory conflguration • Automatic self 
test • Includes interface docking cable. 

The Bufferboard is made by Orange 
Micro, Ine. ; thè same people who brought 
you thè popular Grappler + printer inter¬ 
face. Both thè Grappler + and The 
Bufferboard are now available at your 
locai Apple dealer. 

Apple is a registered trademark of Apple, Ine. 

Epson is a registered trademark of Epson America, Ine. 

SÈOfonqe micco 

ine. 

1400 N. Lakeview, Anaheim, CA 92807 
U.S.A. (714)779-2772 
TELEX: TX 183511 CSMA 


or expensive power supplies are needed 
because The Bufferboard fìts right into 
your Apple—and docks onto your existing 
printer interface. The result is convenient 


and economical buffering of most popu¬ 
lar printer interfaces, including thè 
Grappler + ™ interface, Epson interface, 
and Apple printer interface. Thirty sec- 
onds and a single hook-up are all you need 
to end thè printer waiting game forever. 

Up to 20 letter-size pages 
stored at a time. 

The Bufferboard Comes standard with 
16K, and is expandable to 32K or 64K of 
buffering capacity with thè addition of 


Circle 9 on Reader Service card. 
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Letters 


Congratulations! 

I’m not in thè habit of writing fan 
letters to publishers. In fact, to thè 
best of my knowledge this is my very 
first, but I simply couldn’t let another 
day go by without commenting on 
your newest venture. . . inCider. It is 
fantastici 

R. A. Greene, DVM 
Tempie, NH 

Congratulations to all thè staff. 
Your magazine has made it in just 
two issues. I must admit that it was 
off to a slow start with its first issue 
but, boy!, did you hit full stride by 
your second. Keep up thè great work. 

Bob Baker 
Yarmouth, MA 

Editing Made Even Easier 

An improvement to Dan Bishop’s 
article, “Apple Editing Made 
Easier,” (Feb. 83) was made by thè 
following readers. To eliminate un- 
wanted spaces in thè middle of strings 
that span multiple lines, simply enter 
POKE 33,33 before editing. This will 
limit thè size of thè output text to only 
33 bytes. A POKE 33,40 will then 
restare thè text window to normal 
after using thè right arrow to retype 
and edit a program line. 

Dan Muccianti 
Lake Zurich, IL 
John D. Brand 
Sylmar, CA 
A. R. Rogers 
Riverton, WY 
William Russell 
N. Kingston, RI 

Mark Saks 
Philadelphia, FA 

Tape Versus Disk 

As thè owner of an Apple II for 
four years, using cassette tape Storage 
only, I take exception to thè remark 
“if you’re silly enough to use shapes 
on tapes. . .,” by author Don Fudge 
in “Vector Graphics Made Easy” 
(Feb. 83). 

If thè main use for thè computer is 
business, a DOS is almost a must. For 
thè computer hobbyist, waiting a 


minute or two for a tape to load is not 
of earth-shaking importance. After 
refining thè technique of loading and 
saving, I find cassette Storage 99.9 
percent reliable. (It never fails unless 
I am demonstrating.) 

W. S. Skeen 
Rt. 1, Ager Road 
Hombrook, CA 96044 

Electric Typewriter? 

We are presently considering add- 
ing a printer and have looked at sev- 
eral. Because we also need a type¬ 
writer, we have wondered about 
using an electric typewriter rather 
than a printer. However, we cannot 
find anyone who has had any experi- 
ence with such a setup and therefore 
hesitate to experiment. The type¬ 
writer that we are considering is thè 
Brother EM-1, Can anyone offer any 
advice? 

Nancy Locker 
2013 Schweitzer Road 
Foplar Bluff, MO 63901 

Royal Request 

While thè Apple II Plus and Apple 
Writer II are capable of justified 
margins they will not handle thè 
proportional spacing on thè Royal 
Adler SE5010 typewriter. My locai 
Apple dealer can offer me no help in 
programming for proportional spac¬ 
ing. I surely would appreciate any 
help in this matter. 

Bruce R. Burke, Director 
Operi Bible Ministries, Ine. 

PO Box 148 
Honesdale, PA 18431 

Disk Available 

For those readers who would like 
to use thè assembly language plot- 
ting routines from my article “Get- 
tingHigher on Graphics” (Feb. 1983) 
but would rather not type in all thè 
hex code, I will supply a DOS 3.3 
disk with thè object code for a charge 
of $10. 

Paul Schubert 
1940 Flandrau St. 

St. Paul, MN 55109 


No Response 

I read in thè February 1983 “Let¬ 
ters” column of your magazine that 
William Volk hadn’t gotten a re¬ 
sponse from Apple to a question re- 
garding disk security. Add my name 
to that list, too. I’m disappointed 
with thè company and its apparent 
lack of concern toward its greatest 
asset—thè people out there in com- 
puterland who spend millions on Ap¬ 
ple produets. 

Joe Arbona 
Rancho Cordova, CA 

Future Articles 

Translation articles top my list. 
Another program I’d like to suggest is 
a machine code text file writer. 

Gary Mugford 
Bramalea, Ontario 

A section that includes program 
listings which use thè language card 
would be of great interest. 

Ronald J. Mario we 
Gainesville, FL 

Have you given any thought to 
looking at energy problems or thè 
solar field? An article or two on com- 
patibility problems would be of great 
assistance. Have you given any 
thought to checldng thè past track 
records of companies that have just 
jumped into thè market . . . and have 
a product no one knows about? 

Lawrence T. Pim 
Alliance, OH 

What I would like to see is a de- 
tailed analysis of writing programs, 
games or otherwise, using thè much 
faster assembly language. Emphasis 
on graphics would be very helpful! 

James T. Feezell 
Newport, RI 

Screen Movements 

I have an Apple III computer and 
have invented a game on thè VisiCalc 
III program diskette backup. There 
are objects which you are not sup- 
posed to be able to go through, how- 
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THE GRAPHK SOLUTION 


Solve your toughest communication problems with thè 
Graphic Solution™, a sophisticated, new graphics package 
from Accent Software. 

With precise, multi-speed 
ANIMATION create captivating sales 
presentations and product demon- 
strations that will both intrigue and 
inform your clients and customers. 
Watch their reactions; you’ll see your 
messages getting through. 

Develop educational materials 
and training aids that MIX TEXT AND GRAPHICS on 
thè screen, breathing new life into abstract, hard-to-grasp 
concepts. Mix programs too. 

Images can be displayed on back- 
grounds loaded from any of your 
other programs. Construct custom 
TYPEFACES AND TYPESIZES to 
balance thè visual elements. 

Tired of run-of-the-mill business 
graphics? Change standard charts 
and graphs into colorful THREE DIMENSIONAL 
PERSPECTIVES. Add text and animate thè data to show thè 
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COIBPRESSiQ 

POWER 

EXHBU5T 
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relative rates of change for your most important information. 
Like cash flow projections. Or revenue estimates. 

Plot flowcharts, time and motion 
studies, industriai process flows with 
COLOR-CODED ELEMENTS high- 
lighting criticai paths. Animate thè 
sequences to show how flows actually 
progress. 

Work with live action? Prepare 
film and videotape storyboards using 
thè unique FRAME-BY-FRAME graphic sequencer that 
lets you create and animate a video story before shooting. 

Whatever your graphic communication demands—in thè 
business world, thè arts, industry, 
education—The Graphic Solution™ 
at $149.95 has thè answer. Take a 
hard look at The Graphic Solution. 

You’ll like what you see. 

The Graphic Solution requires a 
48K Apple II with ROM Applesoft 


and DOS 3.3. 


See your locai dealer or 

send $10.00 for a demonstration diskette to: 


ACCENT SOFTWARE, INC. 

3750 Wright Place, Palo Alto, Calif. 94306 Telephone 415-856-6505 


Circle 251 on Reader Service card. 


Apple is a registered trademark of Apple Computer, Ine. 








Lettere 


ever, and I also want to stand in thè 
middle, and have thè screen move 
up. What program can you do this 
on? I have looked through thè index 
of thè òwner’s manual, but I couldn’t 
find anything. Help! 

Fiona Vajk 
57 Oakdene Court 
Walnut Creek, CA 94596 

Disk Copy Wanted 

Here’s a suggestion that will make 
thè magazine more valuable to peo- 
ple like myself who have little or no 
possibility of typing in one of thè list- 
ings without hours of frustration. 
Make thè programs available on disks 
for a reasonable cost. 

Tim Bitler 
Pittsburgh, PA 

My only suggestion for improve- 


ment would be thè option to buy 
your programs on disk. 

Bill Plato 
Broomfield, CO 

Apple III Programs Wanted 

I have recently subscribed to your 
magazine and I’m puzzled. All your 
articles and advertisements concern 
thè Apple II. I own an Apple III, 
which I thought to be a more up- 
dated version of Apple II. I realize I 
can use Apple II programs on my ma¬ 
chine with thè Emulator, but aren’t 
there any written especially for Apple 
III? I’ve only been at this computer 
business for six months and it’s stili all 
a little confusing. - 


Forecasting Suggestions 

I was surprised and pleased to see 
Richard Green’s “Graphing Growth” 
in thè February issue. The techniques 
involved in pressure curve forecasting 
are simple but have proven to be very 
reliable for a great many companies 
in a broad range of industries. I 
would make two suggestions con- 
cerning his implementation of thè 
forecasting technique. 

First, while thè three month mov- 
ing total is appropriate for forecast¬ 
ing many highly aggregateci series 
such as industry-wide shipments, it is 
unusual for thè sales of a single com¬ 
pany to be smooth enough to make 
this work. The twelve month total (or 
average) is usually more appropriate 
because thè result is smoother and 
easier to interpret. 

Second, it is preferable to look at as 
long a time period as possible in fore¬ 
casting, and certainly at a period 
long enough to- contain an entire 
business cycle. While thè average 
business cycle lasts about five years, 
many run a good deal longer. I have 
found that high resolution plots span- 
ning eight to ten years are most use- 
ful. Of course, for thè young enter- 
prise with a short sales history five 
years may be sufficient. 

Mr. Green’s article is a good intro- 
duction to a simple and widely used, 
but little acclaimed economie fore¬ 
casting technique which often yields 
forecasts as good as thè most expen- 
sive econometrie forecasting service. 
Keep up thè good work. 

David B. Lundeen 
1430 Massachusetts Ave. 

Suite 306-29 
Cambridge, MA 02138 

inCider jeels that one of its most im- 
portant roles is to provìde a forum for 
readers. We welcome letters for pub- 
lication with comments on articles, 
embellishments to programs, appeals 
for information—whatever you feel 
moved to write. And please send re- 
sponses to letters. Address your corre- 
spondence to Letters to thè Editor, 
inCider, Pine St., Peterborough, NH 
03458. 

—thè editors 


Deborah J. Newton 
PO Box 26605 
Tucson, AZ 85726 
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thè SAT 


HBJ’s 

Computer SAT 

A complete program for Scoring 
High on thè Scholastic Aptitude Test 

Combmes Computer Software Review Textbook 
and Users Manual Into thè Most Comprehensive 
SAT Study Program Available 


TM 


• Makes studying tor thè SAT easy and 
enjoyable. 

• Builds test-taking skills quickly m 
pian ned systematic program 

• Simple and easy to use even tor those 
with no computer experience. 

Special Features 

• 1000 Electronic Vocabulary-Building 
Flash Cartis 

• 540Specially-DesignedComputerized 
Drill Items 

Complete Textbook 

' How to Prepare for thè SAT" 470 pages. 

• FourFull-LengthExams— enteranswers 
n computer for rnstan: scoring and 
diagnosis 

• Compiete review of verbal and matti 
categones found in exams 

• Strategies for answenng every kind of 
questìon 


User s Manual 

Simpie clear mstructions take you step- 
by-step through thè entire Computer SAT 
program 

Computer Software 

• Scores and times your performance 

• Calculates College Board equivalent 
score 

• Diagnoses your strengths and weak- 
nesses m 15 key areas of study 

• Prescnbes specific drill and review or 
computer ano in thè textbook to improve 
your score 

• Strengthens and builds your vocabulary 

and math comprehension_ 


Educatori Edition Available 

Conduct group sessions with this unique 
package of software and textbooks with 
detailed instructor's guide 
4 Sets of Software (4 
Disks perSet) 20 text - 
books. and 20 user s 
manuals 


r«w5 


Available for: 

■ 

48K Apple - II. ~ 


Apple 1 II Plus 


and Apple * Ile 

-r 

1 • E ; . | 


YES, 

please send me- 


Harcourt Brace Jovanovich, Ine. 


Dept Computer SAT. 1250 6th Avenue 
San Diego. CA 92101 


FOR CREDIT CARD 0RDERS CALL TOLL-FREE 
800-543-1918 Pn California cali collect (6191 699-6335) 


-Computer SAT" (a 69 each 

Quantity 

(for 48K Apple 0 II and Apple 0 II Plus and Apple” Ile) 

Please add $2 00 tor handlmg (UPS delivery guaranteed) Please 
add applicable state and locai sales tax llnstitutions must send 
pu r chase order to be billed l Offer restricted to Continental USA and 
Canada 

Methodof Payment: _ Check . Money Order 
ChargeMy Visa H MasterCard ' ' American Express 


Acci #_ 
Signature. 


. Exp. 


Name_ 

Address- 
City_ 


. State- 


-Zip- 


L. 
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Please send more Information 

The TRS-80 COMPUTER SAT- The IBM COMPUTER SAT ‘ 
(The Educatori Edition Package << S395 00 ea in 5-83 







inCider Subscription Department 
PO Box 911, Farmingdale, NY 11737 

* Apple is a trademark oj Apple Computer Ine. 


Address 
City_ 


State_ 


Canada and Mexico $27.97, 1 yearonly, USfunds, Foreign sur)ace $44.97, 1 yearonly, US funds drawnon US 
bank. Please allow 6-8 weeks for delivery. 
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“It used to be that those one-size-fits- 
all computer magazines were fine for 
learning more about computing. In 
fact, they were about all one could 
find. And it was a treasured issue in- 
deed that contained more than one ar- 
ticle about your particular System. 

The gravity of this situation was 
beginning to dawn when suddenly it 
struck me. . . and I made thè greatest 
discovery of my career, inCider. 

inCider is a monthly magazine 
devoted exclusively to thè Apple* com¬ 
puter. It’s published by thè same 
seasoned editorial staff that produces 
80 Micro. Each issue of inCider con- 
tains more Apple-specific information 
than any other magazine, including: 


•programs 
•articles 
• applications 

•new product announcements 

•reviews 

•tutorials 

•Utilities 

inCider promises to revolutionize thè 
world of Apple computers for only 
$24.97. You’ll receive 12 monthly issues 
of inCider loaded with money-saving 
ads and advice, each issue saving you 
several times your initial investment. 
Enclose payment or use your credit 
card and receive a 13th issue FREE! It 
doesn’t take a genius to know a great 
deal when he sees one.” 

Send in thè attached order form, thè 
coupon below, or cali toll free 

1-800-258-5473 


Exp. date_ Interbank. 

Signature_ 

Name_ 


f 1 want a subscription to inCider for one year at $24.97 
I understand that with payment enclosed or 
credit card order I will receive a 13th issue FREE. 


□ Check enclosed DMC □ VISA □ AE □ Bill me 


YOU don't have to get hit over 

THE HEAD TO REALIZE HOW 
QUKKLY APPLE TECHNOLOGY 
IS CHANGINGT 
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Por Line Surge Suppression 

The SYSTEM SAVER provides es- 
sential protection to hardware and 
data from dangerous power surges 
andspikes. 



By connecting thè Apple II 
power input through thè SYSTEM 
SAVER, power is controlled in two 
ways: 1) Dangerous voltage spikes 
are clipped off at a safe 130 Volts 
RMS/175 Volts de level. 2) High fre- 
quency noise is smoothed out be- 
fore reaching thè Apple 13. A PI type 
filter attenuates common mode 
noise signals by a minimum of 
30 dB from 600 khz to 20 mhz, with 
a maximum attenuation of 50 dB. 


For Cooling 

As soon as you move to 64K RAM 
or 80 columns on your Apple II you 
need SYSTEM SAVER. 

Today’s advanced peripheral 
cards generate more heat. In addi- 
tion, thè cards block any naturai air 
flow through thè Apple H creating 
high temperature conditions that 
substantially reduce thè life of thè 
cards and thè computer itself. 


SYSTEM SAVER provides cor- 
rect cooling. An efflcient, quiet fan 
draws fresh air across thè mother 
board, over thè power supply and 
out thè side ventilation slots. 



For Operating Efficiency 

SYSTEM SAVER contains two 
switched power outlets. As shown 
in thè diagram, thè SYSTEM 
SAVER efficiently organizes your 
System so that one convenienti 
front mounted 
power switch 
Controls SYSTEM 
SAVER, Apple D, 
monitor and prua 


POWER 




The heavy duty switch has a 
pilot light to alert when System is 
on.You’ll never use thè Apple power 
switch again! 


Easy Installation 


Just clips on. 

No mounting or 
hardware required, 
Color matched 
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PATENT PENDING 


Compatible with Apple Stand 



SuggestedRetali £jQQ95 
One Year Warranty O w 


Kensington Microware Ltd. 
300 East 54 Street, Suite 3L 
New York, NY 10022 
(212) 486-2802 
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Time Study 


Study by news mag shows Apple on top. 


A pple dominates thè minds and 
homes of computing Ameri- 
cans, according to a survey conduct- 
ed by Time magazine. 

The survey, conducted by Beta Re¬ 
search of Syosset, NY, indicated more 
people own Apples than any other 
home computer, and when asked to 
name a brand of computer, respond- 
ents most frequently name Apple. 

According to thè mail-question- 
naire survey gamering a response 
from some 3600 homes, 17 percent of 
thè computer-owning respondents 
owned Apples. Tandy placed second 
in thè tally with 14 percent of thè 
owners. 

Apple dominated ownership fig- 
ures even though it does not compete 
in thè market for systems below 
$1000. Tandy ranked first in that 
market segment with nearly 25 per¬ 
cent of those owners. 

But even in thè minds of thè 
sub-$1000 set, Apple played a promi- 
nent role. “Apple and IBM rank 
highly with those owning equipment 
costing less than $1000,” thè survey 


found, “although neither company 
sells to this market.” 

“Apple and Radio Shack dominate 
brand consciousness for thè personal 
computer market,” thè study said. 
“IBM, a relative newcomer to thè 
personal computer field, has broad 
appeal. Atari and Commodore ap- 
parently have not reached as large a 
segment of thè non-owner public.” 

The survey showed 60.2 percent 
of thè respondents aware of Apple 
computers and 48.5 percent aware 
of Tandy. 

Apple’s advertising also seems to be 
effective in capturing thè minds of 
Americans. Nearly 74 percent of thè 
respondents recalled Apple ads, thè 
survey showed, with nearly 50 per¬ 
cent remembering IBM ads and 46.4 
percent Radio Shack’s. 

Of thè ads recalled, 92.4 percent of 
those surveyed recalled thè ads in 
magazines. 

In peripherals, thè Time survey 
showed more respondents (32 per¬ 
cent) owned Apple disk drives than 
any other brand. Placing second in 


that category was Tandy with 8.8 
percent. But when it carne to print- 
ers, Apple placed fourth (3.4 percent) 
behind Epson (22.9 percent). Radio 
Shack (11.0 percent) and IBM (5.9 
percent). 

Other findings from thè survey 
included: 

• Key factors in home computer 
ownership are income and school-age 
children in a household. Of thè peo¬ 
ple with a computer or with inten- 
tions of buying one within 12 
months, 86 percent had incomes 
above $25,000 a year. Of all 
households with annual incomes 
above $25,000 and with school-age 
children, 24 percent had home com¬ 
puters; 

• When asked what they use their 
computers for, owners most often 
mentioned games and hobbies and 
personal finance. When asked what 
they wanted to do next with their 
micro, owners most often responded: 
hook into some kind of inforniation 
System; 

• Of prospective computer buyers, 
thè highest number (73.6 percent) 
said they would be using their micro 
for personal finances and taxes; and 

• Respondents most often picked as 
thè primary factor in selecting a com¬ 
puter a company’s reputation for 
quality; next was expandability; then 
ease of use, Service reputation; and 
adequate software, ■ 





















































Giveaway 


Rhode Island firm 
offers auto jobbers 
Apple as purchase 
incentive. 


M ore and more auto-parts busi- 
nesses may be joining thè Ap¬ 
ple generation, under an incentive 
program sponsored by Fram- Autolite 
Corporation of Providence, RI. 

Under thè program ending next 
month, Fram—a manufacturer of 
PCV valves, windshield wipers, 
spark plugs, and filters for auto, truck, 
and heavy equipment engines—of¬ 
fers two computer packages to busi- 
nesses: one with an Apple II Plus, 
disk drive, RF modulator, game, and 
introduction to keyboard software 
programs; thè other includes every- 
thing in thè first plus another disk 
drive, printer, and inventory control 
program. 

How much a business pays for thè 
System depends on several factors, in- 
cluding thè amount of Fram products 
purchased, when thè purchases were 
made, and how much thè customer 
contributed to Fram’s co-op advertis¬ 
ing program. 

. Peter Monsarrat, Fram’s sales pro¬ 
motion manager, claimed in a state¬ 
ment: “The savings will be substan- 
tial. In this offer, a $3800 comput¬ 
er System can be obtained for $1000 
or less.” 

He said he expects to move 1500 
computers through thè premium pro¬ 
gram; however, thè offer has thè po- 
tential of moving 10,000 systems. 

Computer use in thè auto after- 
market is increasing, according to a 
study released this fall by thè Motor 



The auto after-market 

More and more auto-parts businesses are turning to Apples. 




Equipment Manufacturers Associa- 
tion. Today, more than 32 percent of 
all jobbers use computers in some 
aspect of their business. That’s nearly 
twice thè amount (17 percent) re- 
ported in 1980. 

Montsarrat attributes thè growth 
to thè lower price of computer hard¬ 
ware and software, smaller size of 
equipment and improved programs 
tailored to thè automotive after- 
market. 

“Computers,” he said, “will be- 
come a way of life in our industry and 
others in thè next decade. Business 
has to make decisons fast to maintain 
profit levels, and computers are thè 
way to do it.” 

“Inventory control,” he continued, 
“is thè most common use of comput¬ 


ers in thè aftermarket. Computers 
perform this function more quickly 
and accurately than thè manual 
method. 

“For example, thè Apple System 
can pinpoint obsolete or slow moving 
parts, so a jobber can replace them 
immediately with more popular 
items. This speeds up thè ordering 
process and enables businesses to trim 
their inventory levels without losing 
sales because they are out of mer- 
chandise.” 

Montserrat added jobbers can also 
use their Apples for other business 
tasks, including monitoring receiv- 
ables, purchasing, sales analysis, 
business planning and forecasting, 
word processing, electronic filing, 
and customer billing. ■ 


SOFTWARE 


Apples Headed to Junkyard? 

P eople are going to start scrap- of thè micro industry) risk becoming 
ping their Apple computers and obsolete. 


X. ping their Apple computers and 
thè like because they’re too old, too 
slow, and just don’t do much,” 
declared David Callan, president of 
Callan Data Systems, Westlake 
Village, CA. 

According to a statement from 
Callan, Apple and similar systems 
based on CP/M (sometimes referred 
to as thè de facto operating System 


of thè micro industry) risk becoming 
obsolete. 

“If you take an operating System 
like thè Apple,” Callan said, “based 
on an older microprocessor, thè 8086 
or 8088, you can’t upgrade thè CP/M 
operating System. It’s impossible. 
You re stuck with a lot of limited and, 
eventually, antiquated equipment. 
That’s why we’ve dedicated all our 
resources to thè development of thè 
Unix operating System.”■ 












The VersaBusiness™ Series 


Introducing thè Most Powerful 
Business Software Ever! 

TRS-80™ (Model I, II, III, or 16) • APPLE™ • IBM™ • OSBORNE™ • CP/M™ • XEROX™ 


Each VERSABUSINESS module can be purchased and used independently, 
or can be linked in any combination to form a complete, coordinated business System. 


VeRSaRECEIVABLES™ $99.95 

VersaRECEIVABLES™ is a complete menu-driven accounts receivable, invoicing, and 
monthly statement-generating System. It keeps track of all information related to who 
owes you or your company money, and can provide automatic billing for past due ac¬ 
counts. VersaReceivables™ prints all necessary statements, invoices, and summary 
reports and can be linked with VERSALEDGER H t " and VERSAlNVENTORY™. 

V ERS AP A Y ABLES t " $99.95 

VERSAPayabLES™ is designed to keep track of current and aged payables, keeping you 
in touch with all information regarding how much money your company owes, and to 
whom. VERSA PAYABLES™ maintains a complete record on each vendor, prints checks, 
check registers, vouchers, transaction reports, aged payables reports, vendor reports, 
and more. With VERSA PAYABLES™, you can even let your computer automatically select 
which vouchers are to be paid. 

VERSAPAYROLL™ $99.95 

VERSAPAYROLL™ is a powerful and sophisticated, but easy to use payroll System that 
keeps track of all government-required payroll information. Complete employee records 
are maintained, and all necessary payroll calculations are performed automatically, with 
totals displayed on screen for operator approvai. A payroll can be run totally, automati- 
caily, or thè operator can intervene to prevent a check from being printed, or to alter 
information on it. If desired, totals may be posted to thè VERSALEDGER ir - System. 


VersaLedger ir $ 149.95 

VERSALEDGER II™ is a complete accounting System that grows as your business 
grows. VersaLedger II™ can be used as a simple personal checkbook register, 
expanded to a small business bookkeeping System or developed into a large 
corporate generai ledger System without any additional software. 

• VersaLedger II” gives you almost unlimited Storage capacity 

(300 to 10,000 entries per month, depending on thè System), 

• Stores all check and generai ledger information forever, 

• prints tractor-feed checks, 

• handles multiple checkbooks and generai ledgers, 

• prints 17 customized accounting reports including check registers, 
balance sheets, income statements, transaction reports, account 
listings, etc. 

VersaLedger II™ Comes with a professionally-written 160 page manual de¬ 
signed for first-time users. The VersaLedger II™ manual will help you become 
quickly famiiiar with VersaLedger IP", using complete sample data files 
supplied on diskette and more than 50 pages of sample printouts. 


SATISFACTION GUARANTEED! 


Every VERSA BUSINESS™ module is guaranteed to outperform all other competitive Systems, 
and at a fraction of their cost. If you are not satisfied with any VERSABUSINESS™ module, you 
may return it within 30 days for a refund. Manuals for any VERSABUSINESS™ module may be 
purchased for $25 each, credited toward a later purchase of that module. 


VERSAlNVENTORY™ $99.95 

VERSA Inventory™ is a complete inventory control System that gives you instant access 
to data on any item. VERSAlNVENTORY™ keeps track of all information related to what 
items are in stock, out of stock, on backorder, etc., Stores sales and pricing data, alerts 
you when an item falls below a preset reorder point, and allows you to enter and print 
invoices direetlyor tolink with thè VERSA RECEIVABLES™ System. VERSAlNVENTORY™ prints 
all needed inventory listings, reports of items below reorder point, inventory value re¬ 
ports, period and year-to-date sales reports, price lists, inventory checklists, etc. 

•CQMPUTRQNICS’ 

50 N. PASCACK ROAD, SPRING VALLEY, N.Y. 10977 

* TRS-80 is a trademark of thè Radio Shack Division of Tandy Ccrp. - ‘APPLE is a trademark of Apple Corp - ‘IBM is a trademark of IBM Corp. ‘OSBORNE is a trademark of Osborne Corp 
Clrcle 66 on Reader Service card. *CP/M is a trademark of Digital Research • ‘XEROX is a trademark of Xerox Corp. 


To Order: 

Write or cali Toll-free (800) 431-2818 

(N.Y.S. residente cali 914-425-1535) 

* add $3 for shipping in UPS areas * add $5 to CANADA or MEXICO 

* add $4 for C.O.D. or non-UPS areas _ * add proper postage elsewhere 


DEALER INQUIRIES WELCOME 

All prices and specifications subject to change / Delivery subject to availability. 













AppbOit-n 


The Cat System lets you slip something 
into your Apple II no other modem offers— 
a complete range of speeds from 110, 300 and 
202 half-duplex—to full duplex 212 . 

Either way, you have state-of-the-art LSI 
technology. And it means you can start right 
off with thè most advanced System available. 
Or you can trim your investment, yet always 
have thè option to move up at any step with 
absolutely no compromises in quality. 

Com-Ware ™ software is part 
of thè package. 

Five minutes after you’ve booted up thè 
Novation Com-Ware you’ll have a good 


notion of what it’s like to work with thè best, 
most accurate, most convenient personal com- 
munication System designed for your Apple. 

It makes all of thè moves you need to work 
with another computer, swap programs, access 
data, whatever. 

And it’s simple to operate. Just follow thè 
menu. No programming, no fussing. 

It’s all there. 

New—telephone directory. 

Our engineers have done it again. They Ve 
expanded our Com-Ware. Now included: 
a time-saving directory of 26 telephone num- 
bers with terminal configurations all selected 
and stored for auto dialing. Handy. 

And some nice extras. Print-out during 
communication, a non-destructive memory 
mode, a changeable “welcome” mèssage for 
automatic answer. There’s more. 

If you have an Apple-Cat II and our earlier 
Com-Ware (4-4 or earlier), you should really 
have thè new one (5.0). As always, it’s free. 
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Its thè 

modem/communication System 
you grow into, not out of. 



Just send us your old diskette and we’ll send 
you thè new one. 

It can malte all thè moves you want. 

Start with 110, 300, 202 half-duplex. Or—add 212 
full duplex and move data four times faster with accurate, 
block by block verification. / Automatically send and receive 
anytime—including thè middle of thè night when line 
charges are lowest. / Use 80 or 40 column format. / Set for 
locai or remote echo. And more. 


offer. It’s limited, but it gives you a taste. 
They’re at your dealer. 

He has all of thè details. See him now. 


Easy installation. 

In less than 10 minutes, 
you’re talking to 
thè world. 


Two more reasons to 
move right now. 

Packed with every 
Apple-Cat II 
is a list of options. You 
get your choice of any 
one—and save 
up to $40. 

Also, if you’ve 
ever wanted to take 
a look at The Source, SM 
this is your chance. With your" 5 
Apple-Cat II you get a sampler subscription 



More features than any other modem. 

• Full range of communication baud rates—up to 1200 (Bell 
System 100, 202 or 212 series compatible) • Full or half 
duplex operation • Complete Com-Ware System on a single 
diskette. Also, wide assortment of excellent software avail- 
able from other sources • All automatic functions —auto diai 
(pulse or Touch Tone), redial, auto answer and disconnect 

• It’s a telephone with speaker monitor—-switch betweeri data 
and voice. For regular use, it’s a handy intelligent phone 
with auto-dial • Touch Tone receiver • Built-in BSR X-10 Con¬ 
troller • Remote control for external cassette tape recorder 

Y/ • Works with other Apple parallel or serial printer interface 
cards * Constant status display on screen • Binary or text 
modes • Single card installation for Apple Cat II and 
an additional card for thè 212 upgrade • FCC certifìed 
built-in phone line interface (PLI) Module 
212 Up9 racle 1 • New full Duplex 212 option. 


Novation 


Novation, Ine. 

18664 Oxnard Street 
Tarzana, CA 91356 

(800) 423-5419 • In California: (213) 996-5060 

Apple ìs a registered trademark of Apple Computer, Ine. BSR is a trademark of BSRCorp 
CAT is a trademark of Novation, Ine., which does not manufacture Apple computer®. 



Circle 272 on Reader Service card. 
















The Applesoft Advlser 

by Dan Bishop 


Recipe for Random Access Salad 




L ast month I suggested that you 
should make every attempt to 
use structured programming tech- 
niques in thè Basic programs you 
write. I briefly outlined how to use 
thè subroutine in Basic to achieve thè 
modularity that is so important to a 
well structured program. 

This month 1*11 introduce several 
such modules that can be used in 
any program that requires random 
access disk files. Two of these mod¬ 
ules may appear without any change 
in all programs you write that use 
random access files. The remain- 
ing modules are designed to sim- 
plify thè process of packing data 
into random access records and of 
retrieving that information 
from thè disk in us- 


able form. 

Why Random Access? 

Most truly useful programs require 
thè computer to process a fairly large 
amount of data. The exact nature of 
thè processing depends on thè specific 
application being undertaken. Pro¬ 
cessing inventory data is quite dif- 
ferent from processing payroll, for 
example. But all such programs have 
one common element. Each must 
store thè data to be processed and thè 
results of thè processing onto some 
permanent Storage device so that thè 
data may be retrieved at a later date. 
Although cassettes can be used for 
data Storage, for most practical pur- 
poses they are too ineffi- 
cient and unreli- 


able. The floppy disk overcomes both 
of these problems. 

I am sure that many of you began 
your computer experience using 
cassette Storage for your data, and 
finally upgraded your System to in¬ 
clude a floppy disk drive. You were 
undoubtedly amazed at thè greater 
speed with which records could be 
pulled from thè disks. No matter that 
you may stili be using sequential ac¬ 
cess files on your new disks. Sequen¬ 
tial access worked well enough on 
cassette (which allowed no option), 
and it works even better now on disk. 
Why bother with random access file 
procedures anyway? 

Well, if you were pleased with thè 
increased efficiency you observed 
when you switched from cassette to 
disk Storage, you will be even happier 
once you convert your data files to 
random access. The reason is 
simple. To sequentially access 
a record, thè computer must 
read every record from thè 
start of thè file until it arrives 
at thè desired record. This is be- 
cause each record in a sequential 
file may consist of any number of 
characters so there is no way for 
thè computer to predict exactly 
where on thè disk thè desired rec¬ 
ord will be found. Inserting new 
records into thè file requires 
that thè entire file be re- 
written. Deleting old rec¬ 
ords leaves a gap in thè 
file that can only be filled 
if a new record happens 
to have thè same length 
as thè one that was 
deleted. 

Records in a random ac¬ 
cess file, on thè other hand, al- 
ways have thè same record length, 
and this length is given to thè com¬ 
puter to determine exactly where to find 
record number 385 in thè file if it knows how 
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long each record is. The computer 
can find that record almost im- 
mediately. Furthermore, any holes in 
thè file formed by deleting reeords 
can be filled with new reeords, since 
all reeords in thè file have a standard 
length. A new record may be inserted 
easily into thè old file simply by mov- 
ing all higher reeords up one record 
position to make room for thè new 
record. • 

The reai advantage to using a disk 
drive for data Storage lies not so much 
in its greater speed but rather in thè 
ease with which specific data can be 
located on thè disk. Using sequential 
files nullifies this particular advan¬ 
tage. I hope to show in thè remainder 
of this arride that using random ac- 
cess files is not as complicated as you 
might have believed. 

The Ingredient List 

Listing 1 (lines 10 and 9400 to 
9470) provides thè program instruc- 
tions for thè first “recipe” style 
module to go into a random access 
program. No aspect of this sub- 
routine will be changed. Every pro¬ 
gram will contain this instruction set 
exactly as it is shown here. 

This subroutine gives thè com¬ 
puter some essential information 
about your random access files. The 
first thing thè computer must know. is 
thè number of random access files 
you pian to use in this program. That 
number is given as a Data element in 
line 9600. For example, if you will be 
using three random access disk files in 
thè program, then your program will 
have thè following program lines: 

9599 REM RANDOM ACCESS FILE SPECS 

9600 DATA 3 

Line 9400 in thè subroutine from 
Listing 1 reads this data element as F. 
(By thè way, all other data in your 
program must come after line 9700 to 
keep it from interfering with thè data 
elements used by this subroutine.) 
Line 9410 uses this value to dimen- 
sion four arrays. F$(I) will contain 
thè names of each of your random ac¬ 
cess files. FR$(I) wiÙ be used by thè 


Address correspondence to Dan Bishop, 
Custom Comp, PO Box 429, Buona Vista, CO 
81211. 


program to contain all of thè data in 
thè current record from file I. FR(I) 
will be thè current record number 
from file I, and FL(I) will be thè 
length of each record contained in 
file I. 

Lines 9420 to 9440 form a loop 
that is executed once for each file you 
pian to use (as indicated by thè Data 
statement in line 9600). Each file you 
pian to use must be identified with 
two Data elements. The first will be 
thè file’s name (as it will appear on 
thè Catalog listing), and thè second 
will be thè record length for each 
record in that file. You may wish to 
devote a separate Data line for each 
file. Thus you might have thè follow¬ 
ing three Data lines in your program: 
9610 DATA NAMES, 32 
9620 DATA ADDRESSES, 32 
9640 DATA COMMENTS, 64 


With these Data elements, you are 
telling thè computer that thè first 
data file will be named “Names” and 
that each record in this file will Te¬ 
quile 32 bytes. File number two will 
be named “Addresses” and will have 
reeords occupying 32 bytes, and file 
number three will be named “Com- 
ments” and will have reeords that 
contain 64 bytes. 

Lines 9450 and 9460 define three 
string constants that will be used by 
thè subroutine shown in Listing 2. 
The variables used for these constants 
are D$ and DB(I). Be sure that you 
do not use these elsewhere in your 
program! 

Before going further, let’s consider 
just how you can determine thè 
record lengths for your files. You 
need to know these values for thè 
Data statements shown above. Each 


10 G0SUB 9400 

9396 REM *:#««*< *:**•>* *-*■♦<♦+: *c*+:*:*4<4i4c *4<*:4«é< **<*< ***: 

9399 REM SUBROUTINE TO INITfALlZE PROGRAM FROM DATA 

9400 READ F 

9410 DIM F*CF>, FR*<F>, FL(F> » FR<F> 

9420 FOR 1-1 TO F 

9430 READ F*<I>. FL<I> 

9440 NEXT I 
9490 D* « CHRt(4) 

9460 DB4<0> - “READ "« DB*<1)« M WRITE " 

9465 BR»«- •* REM 10 BLANKS 

9466 BR**BR4+BR4+BR4+BR$+BR4* BR*-BR4-*-BR4+BR*+BR*-*-BR*+" M : REM 233 BLANKS 
9470 RETURN 


Listing I. This listing is a generalized module that istobe used in any program that uses thè 
random access procedures described in this article. The Data statements that are read by 
this module are described in thè article. 


9498 REM •♦••n**************************************************** 

9499 REM SUBROUTINE FOR ACCESSING RANDOM ACCESS DISK FILES 

9500 DA* - D* ♦ "OPEN " ♦ F*<F> ♦ - .L" ♦ STR0(FL(F>) 

9510 PRINT DAt 

9513 0NERR GOTO 3580 

9320 DA* - D* ♦ DB*<FA> ♦ F*<F> ♦ -,R- ♦ STR4(FR(F)'> 

9530 PRINT DA* 

9540 1F FA-0 THEN INPUT FR*<F> 

9330 IF FA-1 THEN PRINT FR»<F> 

9560 PRINT D01"CLOSE" 

9563 POKE 216,0 
9370 RETURN 

9579 REM ERROR HANDLING ROUTINE TO ESTABLIBH NEW BLANK RECORD 
9380 PRINT D0« "CLOSE 1 * * FA-1 

9582 POKE 216,0 

9583 FR»<F>- LEFT,(BR*. FL(F» 

9590 GOSUB 9500 

9595 GOTO •»»•* 


Listing 2. This module takes care of thè actual transfer of data between thè computerà 
RAM memory and thè disk. Only line 9595 needs to be changed for this module to work 
properly in any program that uses my approach to random access disk files. The line 
number to be inserted in line 9595 should be thè line that contains thè FA =■ 0 GOSUB 9500 
instructions which caused thè error to occur in thè first place ( thè error being that no such 
record was found). 
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record can be thought of as a 3 by 5 
card in a small recipe card box. The 
box itself is thè file. Now various 
items of information may be con- 
tained on each card (or in each 
record). Each item occupies a “field.” 
It is important to remember that in 
your case every card in this box con- 
tains thè same number of fields and 
that thè lengths and identities of these 
fields are thè same from card to card. 

Imagine that thè cards for a cer- 
tain box have been especially printed 
with blanks to be filled in. At thè top 
of thè cards is a row of 15 blanks. Be- 
low that is a row of 22 blanks, then a 
row of 15 blanks and finally a row 
that contains two blanks, a space and 


fi ve blanks. All of thè cards are 
printed identically. In this example, 
if you use these cards for mailing list 
information, you might consider thè 
top line to correspond to thè name, 
thè second to a Street address, thè 
third to a city, and thè fourth to thè 
state and zip code. Each record con- 
tains five fields and requir^s a total of 
15 + 22 + 15 + 2 + 5 - 59 blanks 
(or bytes). 

The first step in determining 
record length, then, is to determine 
precisely what information you pian 
to place within a single record. Each 
item of information will correspond 
to a separate field. Then decide on 
how many characters (maximum) 


you pian to assign to each field. Total 
thè number of characters for each 
field and you have arrived at your 
record length. 

Although thè DOS Manual from 
Apple claims that a record length 
may be any size from 1 byte to 32767 
bytes, I have occasionally run into 
problems. In all such cases, I have 
overcome thè problem by selecting a 
record length that is an even factor of 
256. This may be reasonable in light 
of thè fact that thè Apple DOS trans¬ 
fer 256 bytes at a time from disk into 
a memory buffer in thè computer. 

So I would advise sticking to 
record lengths that are powers of 2, 
such as 2, 4, 8, 16, 32, 64 and 128. 
This provides considerable flexibility 
(you don’t have to fili in all thè 
bytes), and if you must decrease a 
field by one or two bytes to fit one of 
these numbers, it usually can be done 
with no great loss. 

Storing thè Ingredients 

Listing 2 (lines 9500 to 9595) pro¬ 
vides thè subroutine instruction set 
that takes care of all of your random 
accesses to thè disk. These lines, like 
those in Listing 1, will appear in your 
program with virtually no changes, 
with thè exception of line 9595, for 
which a line number must be sup- 
plied. The instruction set is designed 
to handle both storing data to thè disk 
and retrieving data from thè disk. 
The difference is denoted by thè 
value of thè operation flag, FA. 

This subroutine uses several vari- 
ables that must be defined within thè 
program before it can be used. The 
variable F must be assigned a num¬ 
ber that corresponds to thè number of 
thè file currently being accessed. For 
example, if you had named your files 
as shown in thè example above (lines 
9610 to 9630), then if you were cur¬ 
rently accessing thè Comments file, 
you would want F to have a value of 
3 (corresponding to file 3). FR(F) 
must also be defined by thè program. 
It must be given thè value that cor¬ 
responds to thè specific record 
number in thè file that you are deal- 
ing with. Finally, FA must be as¬ 
signed a value of 0 if you are retriev¬ 
ing data from thè disk (“Read” and 


1 REM SAMPLE PROGRAM USINO TWO DISK DATA FILES 

2 REM EACH FILE CONTAINS ONLY ONE FIELD. 

IO BOSUB 9400 

20 HOME 

30 BL»*" "I REM 10 BLANKS 

40 BL*»BL*+BL*+BL*<-6L*+BL*+BL*«-.REM 64 BLANKS 

50 INPUT"WHICH FILE...“IF 

60 IF F>2 OR F <1 THEN 50 

70 INPUT"WHICH RECORD. .. "!FR<F) 

80 FR*CF) =" "" 

90 INPUT "SAVE TO DISK OR LOAD FROM DISK CS/L>..“lA* 

100 IF A*-"S" THEN GOTO 160 

11» IF A*0“L“ THEN DOTO 90 

119 REM PREPARE T0 LOAD DATA FROM DISK 

12» FA - B 

13» G0SUB 9500 

140 PRINT FR*<F) 

150 GOTO 50 

159 REM PREPARE TO SAVE DATA TO DISK 

160 FA - 1 

170 INPUT“ENTER DATA YOU WISH T0 SAVE.. . “IFWCFl 
160 FR»(.F) - LEFT*(FR*(F> + BL*. FL(F) ) 

190 GOSUB 9500 

200 PRINT“DATA IS STORED. ’ 

210 GOTO 50 

9398 REM •Mi*i*t*iH«t«*i*i*>»«*»«*#«***«#«*#«4«i4***«******#«**«**'*'**'* 

9399 REM SUBROUTINE TD INITIALIZE PROGRAM DATA 

9400 READ F 

9410 DIM F*<F)» FR*<F>, FL<F)* FR(F) 

9420 FOR 1-1 T0 F 

9430 READ F*<I>, FL(I) 

9440 NEXT I 
9450 D* * CHR*<4> 

9460 DB*(0) - “READ H » DB*<t> * "WRITE " 

9470 RETURN 

9498 REM **iM,***«»«****"*«»«***+*****»«***«******M«*** 

9499 REM SUBROUTINE FOR ACCESSING RANDOM ACCE8S DISK FILES 
9300 DA* - D* t- "OPEN - + F*<F> + -, L" ♦ STR*<FL<F) ) 

9310 PRINT DA* 

9313 QNERR GOTO 9380 

9520 DA* - D* ♦ DB*(FA) + F*(F) «■ ",R- ♦ BTR*<FR<F>) 

9530 PRINT DA* 

9340 IF FA-0 THEN INPUT FR*(F) 

9530 IF FA»1 THEN PRINT FR*<F> 

9560 PRINT D*»"CLOSE" 

9565 POKE 216.0 
9570 RETURN 

9579 REM ERROR HANDLINO ROUTINE T0 ESTABLI5H NEW BLANK RECORD 
9380 PRINT D*l"CL0SE"*PRINt"NO SUCH RECORD ..." 

9582 FA-1« POKE 216,0 

9585 FR*CF) - LEFT*<BL*,FL<F)) 

9390 GOSUB 9500 
9595 GOTO 120 
9600 DATA 2 

9610 DATA TEST ONE, 32 
9620 DATA TEST TWO, 64 


Listing 3. A simple random access record keeping program using two files , records with 
single fields, and thè generalized disk access procedures described in this article. 
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Low Discount Prices 
Fast, Friendly Service 
TOLL FREE ORDER LINE 


No Hidden Charges. 

No Charge for Credit Cards. 

No Shipping Delay for Personal Checks. 


ADVENTURE INTERNATIONAL 

RearGuard ..$23.96 

SAGA #1-12 .sa. 31.96 

Stona of Sisyphus .23.96 

Tunnel Terror.23.96 

AUVOHATED SMULATMNS/ 

era 

Cnnti, Crumbte, . 


A Chomp . 

.. $23.96 

DatttSfones of Ryn .. 

... 15.96 

Hellfire. 

... 31.96 

Invaston Orlon . 

. . . 19.96 

Keys of Acheron . . , . 

.. , 15.96 

Morate* Maze. 

... 23.96 

Morioc’s Tower. 

... 15.?6 

New World... 

... 23.96 < 

Star Warner. 

... 31.96 

Tarn pie of Apshai ... 

... 31.96 

Upper Reaches of 


Apshai . 

... 15.96 

BROOERBUND 


Ai .. 

.. $27.96 

Alien Rain . 

... 19.96 

Apple Panie . 

... 23.96 

Arcadi MtcNni r... 

... 4796 

OMfÉlsr.. . 

... 2796 

Galactìc Empire .,, 

... 19.96 


Galactic Revolution .... 19.96 

Galactìc Trader.19.96 

Genette Drift.. 23.96 

Labyrinth ..23.96 

Midnight Magic.27.96 

Sea Fon.23.96 

Serpentine.27.96 

Star Blazer. 25 96 

Track Attack.23.96 


CALIFORNIA PACIFIC 

Akalabetti...$27.96 

Desecration.34.96 

Ultima.31.96 

MTAMOST 

AMc.$31.96 

Catino.31.96 

County Fair.23.96 

Crazey Mazey.23.96 

Gin Rummy.23.96 

Mare Care .23.96 

Missing Ring.23.96 

Pandora's Box.23.96 

Pig Ben.23.96 

Snack Attack.23.96 

Swashbuckler.27.96 

Thief .... 27.96 

Thorolian Turmeis.23.96 

Tubeway II.27,96 

Vegas Video.23.96 

DATASOFT 

Canyon Climber.$23.96 

Zanai.3196 

EDU-WARE 

Empire I: 

World Builder;.$26.36 

Empire II: 

IntersfellarSharia ... 26.36 
Empire 111: 

Armagcddon. 2636 

Prisoner 2 . 2636 

Rendezvous.31.96 


FheMrd.. $23.96 

HighOrM.23.96 

Horizon V.27.96 

Phaser Firn .23.96 

fiusski Ouck. 27.96 

Zenith.....27.96 


Sheila.$20.00 

Super Tamari 2.20.00 

HAYDEN SOFTWARE 

Beiihoo.$23.96 

Crime Stopper.27.96 

CryttalCavems_.... 27.96 

Kamikaze.27.96 

Laser Bounce.23.96 

Rnertal.27.96 

Saigon il .27.96 

INFOCOM 

Deadline.$39.96 

Starerò». 31.96 

ferii UlfclR.aa. 31.96 


Adventure ..$23.96 

Óympic Decathakm ... 23.96 

MUSE 

ABM.$19.96 

Caettt WoR a netain. 2396 

Caverna oi Fratta*.23.96 

International Grand 

Prix.24.00 

Robot War.31.96 

Thratt Mite Island.31.96 

OOESTA 

Checkers.39.96 

Chaee 74).55.96 

Od in .39.96 

AH three games above 120.00 

PENGUIN SOFTWARE 

Pie Man ..$15.96 

Sp/tDemise. 15.96 

Thunderbombs.15.96 

Transylvania.15.96 

QUAUTY SOFTWARE 
Ali Babai 

Forty Thieves.$26.36 

BeneathAppleManor.. 23.96 

Fastgammon.. 19.96 

Vieterei ds in Space .... 15.96 
Reversai.23.96 


Adv. #0 Mitsion 

Asteroid.$15.96 

Adv. #1 Mystery House. 19.96 
Adv. #2 Wizard & 

Prlncess.26.96 

Adv. #3Cranston 

Manor.27.96 

Adv. #4 Uysess.27.96 

Adv. #5Tene Zone .... 79.96 
Adv.#6 Deck Crratil... 31.96 

Cannonball Blitz.27.96 

Croasfir».23.96 

Frenar.27.96 

Jawbreaker.23.96 

Marauder. 27.96 

Scftpòm Adventure_23.96 

Threshold.21.96 

UMma li.47.66 


PACKAGE OEALS 

Visi Caie 4 
VisiTrend/Ptat 

.$385.00 

PFS: Rie, Graph & Report 

..275.00 

Screenwriter II & General 
Manager 2.0 ... 250.00 
Wizardry & Knight of 


SENTI NENT 

Congo.$27.96 

Cyborg.26.36 

Gold Rush.27.96 

Oo-Topos.26.36 

SIRIU8 

Bandita.$27.96 

Beer Run.23.96 

Biade of Biackpool.... 31.96 

Epoch.27.96 

Escape From 

Rungistan.23.96 

Gorgon.3LS6 

Hadron.27.96 

Kabul Spy.27.96 

Minotaur .27.96 

Rrarion ..3LSS 

Snèaker».23.96 

Type Attack.31.96 

WavyNavy....27.96 

Wayout.31.96 

SI R-TECH 

Galactìc Attack.$23.96 

bktt ri Otamonda ... 27,66 

Star Maze.27,96 


BUSINESS 

PROGRAMS 


Diamonds_ 

. 60.00 

Ultima 1 & Il_ 

. 70.00 

Starter Pak 


Vis (Cale 


Screenwriter II 


PFS: Rie. 

. 355.00 

Adventure Rack 


Mystery House 


Prisoner 2 


Zofk 1 . 

.. 70.00 


SOFT IMAGES 

Blackjack Strategy ... $55.96 

Pandemonlum.31.96 

Single's Night et 

Moll/s.23.96 

STRATEOK 6UIUUT10N6 
Computer Baseball... $31.96 
Computer Quarterback 31.96 

Cosmic Balance.31.96 

Epidemie.27.96 

Germany 1985.47.96 

Shattered Alliance.47.96 

Tigers in thè Snow — 31.96 
Warp Factor.31.96 

SUB-LOGK 

Righi Simulator...... $26.80 

Pinball: Night Mission . 23.96 
Saturo Navigator.27.96 

SYNERGISTIC 

Atlanti*.,.$31.96 

Crisis Mountain.27.96 

Escape from Arctu rus . 23.96 

Nightmara Gallery.23.96 

Odyssey ..23.96 

ULTRASOFT 

Maek et thè Sun .$31.96 

The Serpente Star.31.96 


Strategy Pack 
Castle Wolfenstein 
Chess (Odesta) 

Warp Factor ... 100.00 
Arcade Pack 
Alien Rain 
Frogger 

Meteoraids in Space 
Super Invadere 

Zaxxon.140.00 

Apple Classics 
Castle Wolfenstein 
Choplifter 
Crossfire 
Gorgon 
Raster Blaster 
Wizardry.150.00 


RISING SUN SOFTWARE 
P.O. BOX 11020 
OAKLAND, CALIFORNIA 94611 
(415) 482-3391 

Ortterine Iniuimetton: Wall accept any forni ot payment—cesti, personal check, money order, VISA/ 
MasterCard, or C.O.D. Send cash et your own risk. Add $2.00 tur UPS shipping; $3.00 for Blue Label Air. 
California residente add applicatile sales tax. ALL ordere shipped seme day received Ifweareautaf stock 
on a parti colar rtem we will indudea special bonus «ètti your order aitien shipped. Visitusat4660Dolores 
Avenue, Oakland, CA 94602. Mentlon incider and reeeive a trae diskett with your order. 


General Ladger 

w/Payablas.$396.00 

Payroll.316.00 

Receivablat.316.00 


CPA Modulai #1-14 
. .aa. $200.00 

DAK1N 5 

Business Bookkeeping 
System.$316.00 

DATABASE 

DB Master.$183.20 

General Manager 2.0.183.96 

PFS: Rie.110.00 

PFS: tepori.100.00 

VisiDex.200.00 

VisiFUe.200.00 

FINANCIAL MOOeUNG/ 
SPREADSHEET 

Desktop Pian II .$200.00 

PFS: Graph.110.00 

SuperCalc.236.00 

VlaKalc.200.00 

VisiTrend/PIOt.240.00 

WORD PROCESSING 

Bank Street Wrlter.... $47.96 

Format II.200.00 

OriginaiEasywrrter .... 79.96 
Professional Eaaywriter 

.140.00 

S era amaritar R ■■■■■■. 1039S 
Screenwriter II Professional 

.159.96 

Super Text 40/80 .... 140.00 
Word Handler....159.20 

GRAPHICS 

Arcade Machine.$47.96 

TheArtist.63.96 

Complete Graphics System 

.55.96 

Graforth II.60.00 

Graphics Magician .... 47.96 
Pascal Graphics Editor. 79.96 

HARDWARE 


Apple Cttt II.$311.20 

Micromodem II .303.20 

Micromodel II w/Terminal 

prog..327.20 

212 Apple Cai.580.00 

JOYSTKKS AND PADDLES 

Joyport.$39.96 

Kraft Joystick.51.96 

Kraft Paddles.39.96 

TG Joystick.47.96 

TG Paddles.31.96 

Trackball (TB).51.96 

Trackball (Wico) .63.96 


CALI TOLL FREE 24 HOURS (ORDERS ONLY) 
(800) 227-1617, «et 114 (Outsfoe California) 
(800) 772-3545. Mt 114 (htsida California) 


Circi» 309 on Raader Service card. 
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“Input”) and a value of 1 if you are 
storing thè data onto thè disk 
(“Write” and “Print”). 

So with three assignment state- 
ments to give appropriate values to F, 
FR(F) and FA, you can execute a 
GOSUB 9500 and retrieve record FR(F) 
from file F on your disk. The record 
will come back as FR$(F), with all of 
thè data for each of thè fields packed 
together in one long string. But more 
about that problem later. If you are 
saving data to disk, thè data must be 
packed into FR$(F) first, and then, 
after you have assigned appropriate 
values to F, FR(F) and FA, you can 
execute a GOSUB 9500 and Bingol The 
record will be stored to disk. 

The subroutine at 9500 al so con- 
tains an errar trap in thè event that 
you attempt to retrieve a record from 
thè disk (FA = 0) using a record 
number that does not exist for that 
file. Should this occur, thè errar trap 
will write a blank record into that 
position in your file and, using thè 
GOTO command in line 9595, return 
thè program to thè instruction that 
requested that record in thè first 
place. On thè second attempt, of 
course, there will be a record (con- 
taining blanks) in that position, and 
thè program proceeds normally. 

The POKE 216,0 instructions are 
necessary to counter thè use of thè 
ONERR instruction. Their presence 
allo ws errors in other parts of thè pro¬ 
gram tò be handled in thè usuai way 
by thè computer. 

Program Listing 3 is a short dem- 
onstration program that illustrates 
thè simplest form of random access, 
in which each record contains only a 


single field. Two files are set up, and 
thè computer prompts you to input a 
file number and a record number. 
You are then asked if you wish to save 
data (onto disk) or to load data (from 
disk). If you indicate that you are 
saving data, you will be prompted to 
type in thè string to be saved and, 
when you press Return, thè record 
will be saved. If you indicate that you 
are loading data from disk, thè 
specified record (if it exists) will be 
retrieved from thè disk and displayed 
on thè monitor. 

Tossing thè Salad 

Most application will require 
more than a single field for each rec¬ 
ord. The subroutine at 9500 Works 
properly only if a single record string, 
identified as FR$(F), is to be written 
to or retrieved from thè disk. In order 
to use that subroutine with more 
complex situations, it will be neces¬ 
sary to devise a module, or sub¬ 
routine, that packs thè data from 
each field into a single record string 
before you store thè data to disk (us¬ 
ing a GOSUB 9500). Similarly, a 
subroutine must be written that will 
accept FR$(F) as a single record 
string retrieved from thè disk and 
break that string down into thè de- 
sired individuai Data elements. 

To prepare thè data from each 
field so that it can be packed into thè 
record string prior to that string’s be- 
jng saved onto disk, each data ele- 
ment must be padded with thè ap¬ 
propriate number of blank spaces so 
that it occupies exactly thè maximum 
number of bytes that you decided on 
when you were setting up thè file’s 


originai specifications. 

This can be accomplished quite 
easily for strings. For example, sup¬ 
pose you had decided that NM$, a 
client’s name, would consist of up to 
20 characters. The fòllowing pro¬ 
gram line will pad whatever name 
NM$ represents with enough blanks 
to provide a total string length of 20 
characters. 

9199 REM SUBROUTINE TO SAVE DATA 
TO DISK 

9200 BL$ = “ * 

9300 NM$ = LEFT$(NM$ + BL$, 20) 

BL$ is defined as a string containing 
20 or more blank spaces. This string is 
concatenated with NM$, and thè left 
20 characters, which includes all of 
NM$ along with thè required num¬ 
ber of additional blanks, is taken and 
reassigned to NM$. 

Lines similar to 9300 must be used 
for each element of string data that is 
fielded within your record. Numeric 
data is handled similarly, with thè 
only requirement being that thè 
number be changed to a string first. 
For example, along with thè name of 
thè client, you might also have in- 
cluded thè client’s identification 
number. If these numbers range from 
1 to 9999, then you will need a max¬ 
imum of five bytes (allowing for thè 
sign), and thè smaller numbers will 
need to be padded with blanks. Line 
9305 may be used for this situation. 
9305 CN$ = LEFT$(STR$(CN) + BL$, 5) 
In this line, thè client’s number, as 
CN, is converted to a string using thè 
STR$ function. Since this string may 
have from 2 to 5 bytes, it needs to be 
padded with blanks using thè same 
approach that was used in line 9310. 
If you are really pinched for space, 
and thè sign of a number is not im- 
portant, you can eliminate it from 
thè string using a Right$ function as 
follows: 

9305 CN$ = RIGHT$(LEFT$(STR${CN) 

+ BL$,5),4) 

Once thè data elements have been 
properly padded, FR$(F) can be 
formed by concatenating them 
together, as in line 9310. 

9310 FR$(F) - NM$ + CN$ 

Of course, F must have been assigned 


9199 REM SUBROUTINE TO SAVE DATA TO DISK 

9200 BL$ - “ 25 blanks 

9210 ON F GOSUB 9300, 9320, 9340 
9220 FA = 1’: GOSUB 9500 
9230 RETURN 

9299 REM RECORD STRING PACKING FOR FILE 1 

9300 NM$ •= LEFT$(NM$ + BL$. 20) 

9305 CN$ - LEFT$(STR$(CN) + BU, 5) 

9310 FR$(F) = NM$ + CN$ 

9315 RETURN 

Sample listing I. 
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Whodunit: 


DRAW YOUR OWN CONCLUSIONS 


Suppose you witness a crime 
—you’re sure you can remem- 
ber whodunit—but can you 9 
Sir-tech brings you “Police 
Artist,” three challenging 
identification games in 
one. 


Police Lineup: 

• pick thè culprit’s face 
out of a lineup and win 
reward “dollars” 

• thè better you get, thè harder 
thè game becomes 


Off Duty: 

• create over 1,000,000 distinct 
faces 

• strengthen your recognition skills 
and remember people you meet 


Full of crisp and humorous illustrations, 
delightfuIly combined with suspenseful 
music, you’ll “face up” to thè challenge time 
and again. 

Three ways to be sure you’ll “never forget a 
face,” from thè people who bring you “Wiz- 
ardry” and its companion scenarios. 


Police Artist: 

• reconstruct thè culprit’s face from a 
catalog of “parts” 

• peek at thè culprit as much as you like, but 
thè less you peek, thè better your score 

• develop thè memory of a supersleuth 


A VAILABLE FOR THE APPLE AT YOUR FAVORITE RETAILER. 
SOFTWARE THAT COMPLIMENTS YOUR INTELLIGENCE 

6 MAIN STREET 
OGDENSBURG, N.Y. 13669 
(315) 393-6633 

Graphics createci with thè aìd of Graphics Magician 

Apple is a registerea trademark of Apple Computéi. Ine 
Police Ai tisi is a trademark of Elizabeth Levili 


SIR-TECH 

SOFTWARE INC. Ij 


Circle 218 on Reader Service card. 
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its appropriate value indicating 
which file this inforni ation is to be 
associ ated with. 

If thè string packing lines listed 
above are included in a subroutine 
that is called by a generalized 
subroutine designed to handle all 
operations that involve saving data to 
disk, then a block of your program 
between lines 9200 and 9399 might 
look like Sample listing 1. 

Two other subroutines must be in¬ 
cluded (lines 9320-9339 and lines 
9340-9359) to take care of thè pad- 
ding and packing of FR$(F) when file 
number 2 (F = 2) or file number 3 
(F = 3) is being used. These subrou¬ 
tines will be handled in thè same way 
as thè subroutine between lines 9300 
and 9315 in Sample listing 1, using 
thè data elements that belong to each 
respective file. The advantage to us¬ 
ing thè generalized routine becomes 
obvious when you are ready to save 
your data onto disk. You have just in¬ 
put thè name (as NM$) and client 
number (as CN) for a new client (or 
edited thè information for an old 
client). You are now ready to save thè 
data to disk as record number 57. 
The following line in thè main pro¬ 
gram takes care of it all. 

220 F = 1 ; FR(F) = 57: GOSUB 9200 

F selects thè specific file you want 
to store thè record in. FR(F) selects 
thè record number to be stored. The 
GOSUB 9200 sends thè program to thè 
“Save Data to Disk” subroutine. 
Since F = 1, thè subroutine between 
9300 and 9315 is used to pack FR$(F) 
with thè padded versions of NM$ and 
CN. FA is then set to 1 so that thè 
subroutine at 9500 knows to store 
FR$(F) onto thè disk. 


“The advantage to using 
thè generalized routine 
becomes obvious when you 
are ready to save your 
data to disk." 


Serving Suggestions 

Of course, storing thè data onto 
disk is only half thè picture. We must 
also be able to retrieve thè data and 
display it or print it as individuai data 
elements. The subroutine at 9500 will 
return data from thè disk as a single 
record string, FR$(F). A subroutine 
module analogous to thè string pack¬ 
ing subroutine (lines 9200-9399) just 
described must be written to unpack 
thè data elements from thè record 
string. 

To unpack thè record string, thè 
MID$ function is used. This function 
extracts a specified number of bytes 
from a given string starting at a posi- 
tion in that string that you can select. 
The generai form of thè MID$ func¬ 
tion is: 

X$ = MID$(A$, A, B) 

where A$ is thè string to be operated 
on, A is a number that tells where thè 
operation is to take place (that is, 
how many bytes over from thè start 
of A$ to count before starting to 
remove characters) and B is a number 
that specifies how many bytes to 
remove. For any given data element, 
B will be thè same number that you 
used above in thè string padding sub¬ 
routine. 

If thè data item being unpacked is 
numeric, thè VAL function can be 
used along with thè MID$ function 
to convert that item into its numeric 
equivalent. 


8999 REM SUBROUTINE TO RETRIEVE DATA FROM DISK 

9000 FA = 0: GOSUB 9500 

9010 ON F GOSUB 9100, 9120, 9140 
9020 RETURN 

9099 REM ROUTINE TO UNPACK DATA FOR FILE 1 

9100 NM$ = MID$(FR$(F), 1, 20) 

9105 CN = VAL(MID$(FR$(F), 21, 5)) 

9100 RETURN 

Sample listing 2. 


In order to retrieve data from thè 
disk, set up a generai data retrieval 
subroutine at line 9000. Then write a 
short unpacking subroutine for each 
file, using lines 9100 and 9198. This 
approach is analogous to thè one 
given above for saving data to disk. 
The lines given in Sample listing 2 
could be used with thè example that 
has been presented thoughout this ar- 
ticle. 

As before, two additional subrou¬ 
tines (lines 9120-9139 and lines 
9140-9159) are needed to handle thè 
unpacking process for records re- 
trieved from file 2 and file 3 respec- 
tively. The appearance of these sub¬ 
routines will be analogous to thè un¬ 
packing subroutine shown in Sample 
listing 2 (lines 9100-9119). 

Now when you want to retrieve 
thè client’s name and number from 
record 86, you will use thè following 
line in your program: 

250 F=l: FR(F) = 86: GOSUB 9000 

On returning from thè subroutine, 
NM$ and CN will be properly de- 
fined for use by thè program. 

Of course, a practical program 
will have FR(F) determined by an in¬ 
put statement from thè keyboard 
rather than an assignment statement 
as shown above, or by thè value of a 
loop counter if thè file is being 
searched for a specific record. The 
important point is simply that thè on¬ 
ly two items that need to be specified 
by thè main program before ex- 
ecuting a GOSUB 9000 to retrieve a 
record are thè file number and thè 
record number. The program does 
thè rest. 

The Appointment Calendar 

If you are a regular reader of this 
magazine, you may recali a “Date- 
book” program listing that I pre¬ 
sented in my March article. In that 
program I used Data statements that 
had to be written into thè program 
each time a new appointment was to 
be entered. The program could only 
handle one week’s appointments. 

Listing 4 makes up for these defi- 
ciencies by providing a “user 
friendly” program for setting up an 
appointment calendar that will en- 
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e McFadden makes 
leaming to use your 
computer and its programs 
an easy, rewarding 
experience. 

Mastering a new System or even a new 
program is not easy. It takes a lot of study, a 
lot of trial and errar, a lot of back-and-forth 
between dense manuals and your computer. 
Wouldn’t it all be so much easier if you had 
a knowledgeable friend sitting by your side? 

Lee McFadden is that friend. He’s been 
producing widely acclaimed teaching tapes 
for over ten years. He knows what informa- 
tion you need, and exactly when you need 
it. Team his skill with thè know-how of 
technical experts, and you get a faster, 
easier way to master your computer and all 
its power. 

Patented Audio Cassettes 

Lee guides you patìentìy, step-by-step, while 
you’re sitting at your keyboard. No con¬ 
nection between thè computer and your 
cassette player is necessary. You leam by 
doing, instead of by reading. And even thè 
tapes are special—a patented FlipTrack 
System lets you go at your own pace. 


covering as much or as little detail as 
you want. 

Ideal for Training 

Use thè courses over and over again. Share 
them with friends, family. students and staff. 
Make “computer literacy” a reality in your 
locai schools. Bring a new employee “up to 
speed” in just hours, instead of weeks. The 
fully indexed Guide included with each 
course is, by itself, an invaluable, on-going 
ref prence 



Moneyback Gankt 

You may order any of die FìpTiadraaHB 
from us on a 15-day “righi of xMi ìok 
Try a lesson or tuo youndt Sfa» Am 
with others. If you're not óekfted X bow 
quickly and easily you begjn to leam. 
retum thè profani in ils originai candton 
for a full refund. No quesfions adsed 

How to Order 

Drop by your locai dealer for a demon- 
stration. Or Visa and MasterCard hoiders 
may add $2.50 shipping and handing » rhe 
prìces, and order toll-free: 

1-800-227-1617, Ext 439 

(In California, cali 1-800-772-3545. Ext 4391 

Choosejrom these rewarding courses: 

How to Operate thè Apple II 8 (sperfy v « -twi 

3 audio cassettes & Operator’s Guide.$49.95 

How to Operate thè Apple///" 

4 audio cassettes, 1 diskette & Operatori Guide.. $95.00 

How to Operate Your Computer Under CP/M* 


3 audio cassettes & Operatori Guide.$49.95 

How to Use VisiCalc® 

4 audio cassettes & Lesson Summary.$65.00 

How to Use Wordstar 1 

3 audio cassettes & User’s Guide.$49 % 




Learnby 

listening to 
a friend. 

5 ^ 

FlipTrack * 

Leaming Systems 

A Division of Mosaic Media. Ine. 

526 N. Main St.. Dept. IC-A 
Post Office Box 711 
Glen Ellyn. IL 60137 
312-790-1117 

FlipTrack is a registered trademark propeity of Mosaic Media. Ine 
Apple is a registered trademark of Apple Computer. Ine. 

IBM Personal Computer is a registered trademark of IBM Corp. CP/M is a registered trademark of Dìaital Research. Ine. 

VisiCalc is a registered trademark of VisiCorp. Wordstar is a registered trademark of MicroPro International Corp. 
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800-327-1013 


MEGA-BYTE 

Div. Of WESTWORLD 
4699 S.W. 45th St. 

Dept. IC 

FORT LAUD., FLA 33314 
305-587-1130 


compass an entire year. Even your 
secretarv, who mav know nothing 
about programming, will be able to 
use this program. 

Each month is treated as a separate 
random access disk data file. So when 
you specify a month number in re- 
sponse to thè prompt for month, you 
are actually designating a file 
number, F, to be used by thè random 
access disk handler routines. Each 
day is treated as one record that con- 
tains 256 bytes. To accommodate an 
entire year, 96K bytes of Storage will 


be required, so for all practical pur- 
poses you will want to devote most or 
all of a disk to handle your appoint- 
ments. 

This program is perhaps a bit un- 
usual in its file requirements in that 
all 12 files have thè same byte re¬ 
quirements (256) and thè data rec- 
ords contained in each file are for- 
matted thè same way. This does sim- 
plify thè packing and unpacking rou¬ 
tines, however, since only one sub¬ 
routine is needed for each of thè two 
functions, even though there are 12 
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Dot Matrix Printer Interfaces with Apple 11 

Featuring an Apple ll®-compatible parallel 
interface, Addmaster Corporation has produced 
a new dot matrix printer, Model 170. The inter¬ 
face includes a Centronics-type handshake and 
DB-25 interface connector, Baudot, and day — 
and time clock. The Model 170 provides 18 or 
21 characters per line, 6 lines per inch print 
density, on standard 2W* adding machine tape. 
Designed to use with personal computers, 
Model 170 will produce hard and carbonless 
copies of programs, data or results. Write 
Addmaster Corporation, 416 Junipero Serra Dr. r 
San Gabriel, CA 91776 or cali 213/285-1121. 
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Scotch Diskettes 

Rely on Scotch* diskettes to keep your valu- 
abie data safe. Dependable Scotch diskettes 
are tested and guaranteed error-tree. The low 
abrasivity saves your read/write heads. 
They’re compatible with most diskette drives. 


( 800 ) 235-4137 


Dealer Inquirles 
invited 


PACIFIC 

EXCHANGES 

100 Foothill Blvd 
San Luis Obispo, CA 
93401 In Cai. cali 
(800) 592-5935 or 
(805) 543-1037. 


Lifting 4. Appointment Calendar program. The main program corresponds to lines 
100-180 (see Figure 2), with each major program function heing handled as a separate 
subroutine. Compare this listing with thè organizational chart of Figure 1. 

1 REM APPOINTMENT CALENDAR PROGRAM 

2 REM DEV. BY DAN BISH0P 

3 REM CUSTOM COMP 

10 GOSUB 9400 : BL* = " REM 25 BLANKS 

19 REM A*U) C0NTAINS APPT. INFO.! T*U> IS THE TIME. 

20 DIM A*i9), T*C9>» D*<£) 

23 REM READ DAYS OF THE WEEK 
30 FOR 1*0 TD 6 

40 READ D*U) 

50 NEXT I 

58 REM FNND(X) DETERMINES THE NUMBER OF DAYS IN A MONTH. 

59 REM IT REQUIRES Y (YEAR) AND M (MONTH NUMBER). 

E0 DEF FNLY(Z)=(M=2AND( INT<Y/4)=Y/4) )M-2ANDCINT (. Y/4) <> Y/4) )+=28 
E 1 DEF FNLZ ( Z ) = <M=40RM=60RM=9QRM=11 ) *=30 

62 DEF FNLX ( Z ) = ( M*=10RM=30RM=50RM-70RM=80RM = 10ORM= 12) +=31 
83 DEF FNND(Z)= FNLY(Z)+FNLZ(Z)+ FNLX(Z) 

89 REM ****:***** MAIN PROGRAM ***4:4=*4: *4:4: +=*=*= 

100 GOSUB 200s REM INPUT DATE 

110 IF F=0 OR YR-0 THEN END 

120 Y = YR: M « F: GOSUB 500: REM FIND DAY OF WEEK 

130 GOSUB 9000: REM GET APPT. PAGE FOR DATE 

139 REM REPEAT ... UNTIL Z*='’X" 

140 GOSUB 1100: REM DISPLAY APPT. PAGE 

150 GOSUB 1200: REM EDIT APPT. PAGE 

1&0 IF Z^<> M X•* THEN GOSUB 900:GOTO 140:REM REORDER APPTS. 

170 IF EF% THEN EF%=0: GOSUB 9200: REM SAVE TO DISK IF EDITED 

180 GOTO 100 

l 98 REM *4:4:4:4:4:4= **4:4 4 4:4: *4= 4:4:4 4 4:4:4:44:4:44:4:4:4:4:4:44:*:4:4:4:4:44:4:4:4:4:4:4:4:44.4:4:4: 

199 REM SUBROUTINE FOR INPUT OF YEAR, MONTH AND DAY 

200 HOME 

210 INPUT"WHICH YEAR (EG. 1983) OR 0...“? YR 

220 IF YR=0 THEN 290 

225 IF YR <1983 OR YR>1999 THEN 200 

230 INPUT"WHICH MONTH (1-12) OR 0.“ ?F 

240 IF F=0 THEN 290 

250 IF <F <1 OR F)12) THEN 200 

260 Y = YR: M * F: ND = FNND< Z) 

270 PRINT"WHICH DAY ( 1-"ND")." I : INPUTFRCF) 

280 IF (FR(F)U OR FR(F) ) ND) THEN 270 
290 RETURN 

498 REM 444441444<44:44:*:44*:*:4:4!4*:4*4=*:*:44:4:4!*:4«4:*t4:*!*i*:4:4:4:4 4 *:*:*:4:*4:*:*:4:4*4: 

499 REM SUBROUTINE THAT DETERMINES DAY 0F THE WEEK FRDM DATE 

500 Y = 1983: X = 0 

509 REM UNTIL Y EQUALS CURRENT YEAR DO... 

510 IF Y « YR THEN 550 

520 X = X + 365 + < Y/4*INT(Y/4) ) 

530 Y » Y ♦ 1 

540 GOTO 510 
550 FOR MM=1 TO 12 
560 ND = FNND(Z) 

570 FOR D“1 TO ND 

580 X = X + 1 

590 IF MM*F AND D*FR(F) THEN MM=12: D=ND: X=X-1 

600 NEXT D 

610 NEXT MM 

620 X = I NT ( ( X/7 - INTtX/7) + .05)47 ) 

630 RETURN 

898 REM 44444MM»lH4HM«4e4444444444444444444444444«44444444444444444 

899 REM SUBROUTINE TO SORT APPTS. BY TIME OF DAY 

900 FOR I = 0 TO 7 

910 FOR J = 1+1 TO 8 


: 4:4r 4:4:4:4= 4:4:4:4:4:4:4:4i 4:4:4= 4:4: *: *: 4:4t 4: 


Listing continued. 
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920 IF T»(J) >= T»CI) THEN 940 

930 GOSUB 1050 

940 NEXT J 
950 NEXT I 

959 REM RELOCATE ALL ENTRIES WITH BLANK TIMES AT END 

960 FOR 1=0 TO 7 

970 IF T»<I) <) " " THEN 1010 

9S0 FOR J=I + 1 TO S 

990 IF T»<J)<>” « THEN GOSUB 1050: J=9 

1000 NEXT J 

1010 NEXT I 
1020 RETURN 

1 048 REM it:*:************************:**************************** 

1049 REM SUBROUTINE TO SWAP APPTS POSITIONS 

1050 T» = T*CJ>! T»CJ) = T*<I)8 T*(I> = T* 

1060 T» = A»CJ): A»CJ) = A»<I): A»(I> = T» 

1070 RETURN 

1 098 REM #:*:#:>»:*#:*:>*«*it:#:***!#i*****:***************************+****** 

1099 REM SUBROUTINE TO DISPLAY CALENDAR PAGE 

1100 HOME 

1110 PRINT F»CF)" h FR(F)", "YR" - "D*<X> 

1120 PRINT"-" 

1130 FOR I,=0 TO 8 

1150 PRINT I". "T*<I>" - "AtCI) 

1160 NEXT I 

1170 PRINT"-" 

1180 RETURN 

1 198 REM •f:******'*»!':*****************:**************************** 

1199 REM SUBROUTINE TO EDIT APPOINTMENT CALENDAR 

1200 PRINT"ENTER NUMBER OF ITEM TO EDIT." 

1210 PRINT" (ENTER X TO QUIT)"? 

1220 INPUT Z* 

1230 Z = VAL(Z*> 

1240 IF Z»="X" THEN 1340 

1250 IF CZ<0 OR Z> 8) OR (Z=0 AND Z*<> "0") THEN 1200 
1260 HOME 
1270 EF% = 1 

1280 PRINT"NEW ITEM: TIME...” 

1290 PRINT"(USE 24 HR CLOCK; ENTER AS HH.MM)" 

1300 PRINT" =) INPUT T4>(Z) 

1310 IF LEN(T»( Z))=0 THEN T»CZ>=" 

1320 PRINT" DESCR.. -" 

1330 PRINT" => " INPUT A»(Z) 

1340 RETURN 

8998 REM *:*>t:»t!*********it'*«t':**********»*'********+****************** 

8999 REM SUBROUTINE TO RETRIEVE DATA FROM DISK 

9000 FA = 0: GOSUB 9500 
9010 GOSUB 9100 

9020 RETURN 

9099 REM ROUTINE TO UNPACK DATA FROM RECORD STRING FR»(F) 

9100 FOR 1=0 TO 8 

9110 A*CI) = MID»( FR*(F>, 25*1 + 1» 20 ) 

9120 T»(I) = MID»( FR*(F>, 25*1+21, 5 ) 

9130 NEXT I 

9140 IF MI D»(FR*(F)» 226,5) = "12345" THEN 9160 

9150 FOR 1=0 TO 9: A*(I) = "": T*(I> = " ": NEXT I 

9160 RETURN 

9 1 98 REM 4:4:4= 4« 4< 4:4:4= 4:4c 4< 4= 4= 4= 4:4=4= 4:4:4:4:4:4:4:4:4= 4* 4:4:4= 4* 4« 4=4:4« 4* 4:4:4= 4= 4=4:4'4:4= 4= 4= 4:4= 4:4:4:4:4: 

9199 REM SUBROUTINE TO STORE DATA ONTO DISK 

9200 GOSUB 9300 

9210 FA = l: GOSUB 9500 
9220 RETURN 

9299 REM SUBROUTINE TO PACK DATA INTO RECORD STRING FR»(F) 

9300 FR»(F) = "" 

9310 FOR 1=0 TO 8 

9320 A*CI) = LEFT*< ASCI) + BL», 20 ): REM BL*=25 BLANKS 

9330 T»CI> = LEFT*C T*CI) + BL», 5 ) 

9340 FR»(F> * FR*(F> + ASCI) + T*CI> 

9350 NEXT I 

9360 FR»(F) = FR»(F> + "12345" 

9370 RETURN 

9398 REM *4:i|'*>t:i»:*>l<*«fci»s*>»:***************************************** 

9399 REM SUBROUTINE TO INITIALIZE PROGRAM FROM DATA 

9400 READ F 

9410 DIM F»(F>, FR»(F)» FL(F), FRCF) 

9420 FOR 1=1 TO F 

9430 READ F»(I), FL(I) 

9440 NEXT I 
9450 D» = CHR*<4> 

9460 DB»(0> = "READ ": DB»(1)="WRITE " 

9465 BR»=" ": REM 10 BLANKS 

9466 BR»=BR»+BR»+BR»+BR»+BR»:BR»=BR*+BR»+BR»+BR»+BR»+" "* RI 

9470 RETURN 

9498 REM i»,*:**********************#:***************************** 

9499 REM SUBROUTINE FOR ACCESSING RANDOM ACCESS DISK FILES 

9500 DA» = D» + "OPEN " + F»(F) + ", L" + STR*CFLCF>> 

9510 PRINT DA» 

9515 ONERR GOTO 9580 

9520 DA» = D» + DB»(FA) + F»(F> + ", R" + STR»(FR(F)) 

9530 PRINT DA» 

9540 IF FA=0 THEN INPUT FR»(F) 

9550 IF FA=1 THEN PRINT FR»CF) 

9560 PRINT D»;"CLOSE" 

9565 POKE 216,0 
9570 RETURN 

9579 REM ERROR HANDLING ROUTINE TO ESTABLISH NEW BLANK RECORD 

9580 PRINT D»;"CLOSE": FA=1 
9582 POKE 216,0 

9585 FR»(F)= LEFT»(BR»,FL(F>-1) 


REM 255 BLANKS 


SOFTWARE 

SELECTIONS 


For Apple® 

Mfg List Fostrack's 

GAMES 


Apple Panie 

$29.95 

$20.95 

Aztec 

39.95 

27.95 

Cannonball Blitz 

34.95 

24.95 

Canyon Climber 

29.95 

20.95 

Castle Wolfenstein 

29.95 

20.95 

Choplifter 

34.95 

24.95 

Deadline 

49.95 

34.95 

Flight Simulator 

33.50 

23.95 

Frogger 

34.95 

24.95 

Miner 2049er 

39.95 

27.95 

Mystery House 

24.95 

17.95 

Serpentine 

34.95 

24.95 

Snack Attack 

29.95 

20.95 

Tempie of Apshai 

39.95 

27.95 

The Arcade Machine 

54.95 

38.95 

The Mask of thè Sun 

39.95 

27.95 

Ultima II 

59.95 

41.95 

Wizardry 

49.95 

34.95 

Zork 1 

39.95 

27.95 

Zork II 

39.95 

27.95 

Zork III 

39.95 

27.95 

HOME & 

HOBBY 

Bag of Tricks 

39.95 

27.95 

Face Maker 

34.95 

24.95 

Mastertype 

39.95 

27.95 

Story Machine 

34.95 

24.95 

Typing Tutor II 

24.95 

17.95 

BUSINESS 


DB Master 

229.00 

159.95 

Home Accountant 

74.95 

51.95 

Muitiplan (Appiè dosi 

275.00 

192.95 

Screen Writer II 

129.95 

88.95 

PFS: File 

140.00 

97.95 

PFS: Report 

125.00 

87.95 

Visicalc 3.3 

250.00 

187.95 


Personal checks allow 2 weeks We accept Visa and 
MasterCard, add 4% for handling. (Send card no and 
expiration date). Include $2.00 for shipping. Ohio resi- 
dents add 5.5% sales fax Prices from thè manufacturer 
subject to change withouf notice. 


raji 


r?Ac< 
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COMPUTER PRODUCTS 

jPSSWII Box 456 

IÌMIII Columbus, Ohio 43216 _ 

Phone Orders/24 Hours: (614) 863-1699 

Apple’ isa registered trademark of Apple Computer, Ine 












APPOINTMENT CALENDAR PROGRAM: 
OBJECTIVE - 

PROGRAM FUNCTION3: 


KEY80ARD ENTRY 
OF SPECIFIC 
DATE. 




RETRIEVAL OF 
CALENDAR PAGE 
FROM DISK. 


DISPLAY 

CALENDAR 

PAGE. 


u-—G 


EDITING OF 
INOIVIODAL 
APPOINTMENT 
LINES. 


LINES 200-390 


LINES 500-690 


LINES 900-1090 


LINES M00-II90 


LINES >200-1390 


STORAGE OF 
CALENOAR PAGE 
ONTO DISK. 


INITIALIZE 
PROGRAM 
READ DATA 
oimension arrays 
DEFINE FUNCTIONS 


Figure 1. Functional modulesfor thè Appointment Calendar program shown in Listing 4. 
Each module i s represented in thè program by a separate subroutine. The line numbers 
g ive thè specific locations allottedfor each subroutine. 
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9590 

GQSUB 9500 


9595 

GOTO 

130 


959E 


9599 

REM 

RANDOM ACCESS FILE 

SPECS 

9600 

DATO 

12 


9610 

DATA 

JANUARY, 256 


9620 

DATA 

FEBRUARY, 256 


9630 

DATA 

MARCH, 256 


9640 

DATA 

APRIL, 256 


9650 

DATA 

MAY, 256 


9660 

DATA 

JUNE. 256 


9670 

DATA 

JULY, 256 


9680 

DATA 

AUGUST, 256 


9690 

DATA 

SEPTMBER, 256 


9700 

DATA 

OCTOBER, 256 


9710 

DATA 

NOVEMBER, 256 


9720 

DATA 

DECEMBER, 256 


9730 

DATA 

SATURDAY, SUNDAY, 

MONDAY, TUESDAY 

9740 

DATA 

WEDNESDAY, THURSDAY, FRI DAY 


files. More commonly a separate sub¬ 
routine would be needed for each 
file used. 

To use thè appointment calendar 
program, you must first cali up thè 
page that corresponds to thè partic- 
ular day you are interested in. This is 
done by providing thè year (using all 
four digits), thè month (a number be- 
tween 1 and 12), and thè day when 
you see thè prompts for these items 
appear on thè screen. The computer 
accounts for thè different number of 
days in each month, including leap 
year February’s. The computer will 
also calculate thè correct day of thè 
week from thè above information, so 
long as thè year is between 1983 and 
1999. Since thè year 2000 is not a leap 
year (even though is is divisible 
by 4), you will have to make a pro¬ 
gram modification to keep thè pro¬ 
gram working properly after Feb- 
ruary 28, 2000. 

With thè year, month and date 


properly entered, thè computer will 
display a calendar page with room 
for nine entries. The entry positions 
are numbered from 0 to 8 and you are 
asked to press a single digit (or thè let- 
ter X) to quit. If you select blank 
line, thè number you press is of no 
consequence, because thè computer 
will automatically sort all of your en¬ 
tries according to thè time of day (if 
you use a 24 hour clock!), placing en¬ 
tries having no time entry at thè end. 
On thè other hand, if you are chang- 
ing an old entry, you must press thè 
number that corresponds to that en¬ 
try in order to write over it. 

You are now asked to enter thè 
time for thè appointment. You may 
simply press thè Return key if you are 
not entering a time. For instance, you 
may be entering simple information 
relating to thè day, such as Wife’s 
Birthday. On thè other hand, if you 
are entering a time, be sure to use a 
24 hour clock, and enter five charac- 


The Applesoft Adviser— 



ters. The first two must correspond to 
thè hour, such as 09 or 15; thè third 
character may be any allowed sepa- 
rator (colons and commas are not 
allowed—try a period, single quote, 
hyphen or slash). The last two 
characters correspond to thè minutes. 

Finally you will be asked to enter 
thè description of thè appointment. 
In order to get a full year on a single 
disk, with nine appointments for 
each day, thè description must be 
brief. The computer will keep only 
thè first 20 characters that you type 
in. When this entry is completed, thè 
computer will sort your new entry in- 
to thè calendar and redisplay thè 
page with thè appointments in their 
proper order. You may now enter an- 
other appointment or you may return 
to thè date prompts by pressing thè 
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FOR COMPLETE GRAPHICS: 

UersaLUriter 


EDUCATION 


GAME PROGRAMMER 







BATTLESIGHT 

COPYRIGHT 1982<VERSA CONFUTINO INC 



w'ipvi i -— ah 

for sine -r» C*g 22K 

out - 

1*8 7 


Function Generator 



HOBBIEST 


Teachers, artists, engineers 
programmers & hobbiests 
find VersaWriter an 
easy to use tool for 
creating micro 
computer graphics. 

No programming 
experience is required. 
Pictures cari be made 
by simply tracing. Even 
children can explore thè 
exciting world of 
computer graphics. The 
VersaWriter is as limitless 
as your imagination. 


ENGINEERING 



vvts 


\\M 



VersaWriter contains 
complete software for 
drawing with color, 
brushes & dots. Add 
text or fili in over 
100 colors. 
Create your own 
shapes and place 
anywhere on thè 
: . screen. Use 

v \ J\ t ) , Area/Distance, 

’ ^ Move Picture, 

Electronic Drawing 
& Skeleton programs plus much 
more. Complete hardware/software 
System for Apple Il/l H-/Ile 
- $ 299.00 


Versa Computing Products are available 


VE^A 

computine, ine 


at your locai computer produets store. 
Distributed by: 


Computerland Corp. 
Hayward, Calif. 

Softsel Computer Products 
Inglewood, Calif. 

Pete & Pam Computers 
Lancashire, England 


Micron Distributing 
Toronto, Canada 
Program Spektrum 
Bromma, Sweden 
Micro Products Sales Group 
Lynn, Mass. 


Educational Media 
Washington, Penn. 

ESD Laboratories 
Tokyo, Japan 

Blue Ridge Computers 
Capetown, South Africa 


3541 Old Conejo Road, Suite 104 • Newbury Park, CA 91320 • (805) 498-1956 
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letter X. To end thè program, enter a 
zero for thè year or for thè month. 

When you first enter a date that 
has not been used before, thè com¬ 
puter will not find a record on thè 
disk for that date. In that event it will 
write a blank record to disk and re¬ 
ini tialize thè program. Type thè date 
a second time and thè blank calendar 
page will appear. 

How thè Program Works 

Figure 1 shows thè program analy- 
sis chart that depicts each of thè func- 
tional elements within this program. 
This chart also lists thè line numbers 
for each function’s corresponding 
subroutine. By modularizing thè var- 
ious functions used by this program, 
thè main program becomes a list of 
subroutine calls, as can be seen in 
lines 100-180 of Listing 4 and thè 
flowchart in Figure 2. 

The first thing thè program does 


(line 10) is execute thè subroutine at 
line 9400, which dimensions thè ar- 
rays to be used by our file handler 
routine and which reads thè Data el¬ 
ements that describe thè files we are 
using to thè computer. Additional 
Data elements to be used by thè pro¬ 
gram must follow these file descrip- 
tors, as is shown by thè names of thè 
days of thè week (lines 9730 and 
9740), which are read next (lines 
30-50). Line 20 dimensions A$, 
which will hold thè descriptions of a 
single day’s appointments, and T$, 
which holds thè corresponding times. 

The user-defined functions (lines 
60-63) all work together to deter¬ 
mine thè number of days contained 
in a specified month for a specified 
year. After these functions have been 
defined, thè main program begins ex- 
ecution at line 100 with a cali to 
Subroutine 200. This subroutine han- 
dles thè keyboard entry of thè desired 


year, month and day for a given ap- 
pointment book page. 

Line 110 in thè main program will 
end thè program if thè value entered 
for thè year or for thè month is 0. 
Otherwise, Subroutine 500 is ex- 
ecuted, in which thè day of thè week 
that corresponds to thè specified date 
is determined. This is done by calcu- 
lating thè number of days contained 
between January 1, 1983 (a Satur- 
day), and thè specified date. The 
variable X is returned from this sub¬ 
routine with a value between 0 and 
6, corresponding to a day between 
Saturday and Friday. Line 620 is 
essentially a “Modulo” operation. 

The main program now tackles thè 
problem of retrieving thè desired cal¬ 
endar page from thè disk. The values 
for F and FR(F) have been defined 
from thè date entry subroutine. 

Thus a simple GOSUB 9000 handles thè 
problem for us. If there have been no 
entries for this date yet, thè error 
handling subroutine will insert a 
blank record for this date and restart 
thè program. This clears thè Gosub 
pointer stack. Consequently, in line 
9595 of our disk file subroutine, thè 
instruction to use is simply RUN. 

Once a record has been retrieved, 
then Subroutines 1100 and 1200 are 
executed in sequence (lines 140-150). 
Subroutine 1100 handles thè display 
of thè appointment calendar page, 
while Subroutine 1200 presents thè 
user with thè opportunity to update 
any of thè fields being displayed. The 
flag variable, EF$, is used to in¬ 
dicate whether any changes have 
been made to thè calendar. It is set to 
1 if there have, and left at 0 if there 
have not. In either event, thè pro¬ 
gram returns to thè main program at 
line 160. 

If Z$ is not an X after retuming 
from Subroutine 1200, then thè oper- 
ator must stili wish to work with that 
page. Subroutine 900 is executed, 
which simply sorts thè entries in thè 
appointment book by time and rear- 
ranges this order so that all entries 
with blanks for a time are placed at 
thè end of thè list. Then thè main 
program cycles back to line 140 to re¬ 
display thè updated page and await 


Clrcle 229 on Reader Servica card. 


UPGRADE 

get Ile features on 
your appiè II 

up to 5 keyboard features with thè 


Auto Repeat: Invaluable. Repeats any 
keypress, including control characters f 
scrolling, rubout, etc. Adjustable delay to 
match your typing touch. ON/OFF control. 

High Speed Cursor: Makes Apple's REPT 
key a speed control to doublé thè repeat 
rate of any keypress. Zip through text or 
across a VisiCalc spreadsheet to get there 
fast. A must for 80 column displays. 

New option for thè REPEATERRRR: 
SHIFT-key Modiflcation: SHIFT as you 
should. Get thè "standardized" connection 
|SHIFT-key to Game I/O) while leaving thè 
Game I/O open with our plug-in connector. 
Supported by most popular word proces- 
sors (Apple Writer II, Word Handler, Screen 
Writer II, etc.) and many other programs. 
Works only with certain software and/or 
most 80 column boards. 

Easy installation. Open top and plug onto 
25-pin connector between keyboard and 
encoder board (fits Rev .7 or later). 

REPEATERRRR 

without SHIFT-key modification*Z*r y5 

REPEATERRRR* 

with SHIFT-key modification $34 95 


E 

P 


WORD PROCESSING 


TO ORDER: Ask your locai dealer 

or order direa. 

Add $2 per order shipping/handlìng 
($5 foreign). Ohio orders add 6.5% sales 
tax. Check, MasterCard VISA (incl. card 
no. & exp. date). 30 day trial — full re- 
fund if not satisfied. One year warranty. 



HighOrderMicroElectronics CO». 

17 RIVER ST. CHAGRIN FALLS OHIO 44022 
PHONE 216-247-3110 

Trademarks: Apple/Apple Computer, Ine., Screen 
Writer 11/Sierra On-Line, Ine., Word Handier/Silicon Valley 
Systems Ine., VisiCalc/VisiCorp. 
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The Applesoft Adviser 


"In addition to improving 
efficiency,... you can 
design screen displays 
and printed documents 
more easily." 


further editing. 

When thè operator has indicated 
that no further use is needed for a 
given display (Z$ = “X”), then thè 
main program executes line 170. If 
any changes have been made to that 
page (as evidenced by EF$ = 1), 
then thè updated page is stored to 
disk using Subroutine 9200. If no 
changes have been made, thè pro¬ 
gram merely cycles back to thè date 
entry point to await instructions 
to cali up another page from thè cal- 
endar. 

The only basic difference between 
thè data packing and unpacking sub- 
routines used in this program is that, 
since all 12 data files are using iden- 
tical records, only one packing sub¬ 
routine and one unpacking subrou¬ 
tine need be defined to be used for all 
values of F. In additon to this 
change, thè final 5 bytes of each 
record, following thè nine appoint- 
ment entries, is thè five-character 
field 12345. This field appears only in 
records that have had data written to 
them. A newly initiated record will 
not have this marker. Consequently, 
for these new records, all values for 
appointment descriptors and for 
times are set equal to blanks to 
remove any unwanted garbage that 
might have been brought in from 
thè disk. 

Conclusion 

It goes without saying that any ef- 
ficient use of disk files for applica- 
tions that involve database manage¬ 
ment operations must ultimately in¬ 
volve random access file handling 
procedures. If you have avoided ran¬ 
dom access files merely because they 
appear to be more complicated than 
other methods, I hope that this article 
has served to alleviate those fears. In 
addition to improving efficiency, by 
formatting thè data fields to specific 
field lengths (a procedure that is not 


actually required in Applesoft), you 
can design screen displays and 
printed documents more easily. 

Next month I pian to begin work¬ 
ing with graphics. I will cover some 
of thè fundamental concepts in 
writing programs that use both low- 
resolution and high-resolution 
graphics displays. The following 
month I will describe a simplified ap- 
proach to developing and handling 


shape tables that alleviates much of 
thè drudgery involved when using 
thè method outlined in thè Applesoft 
manual. In thè meantime, please 
write and share your ideas, com- 
ments and discoveries with me so that 
I can pass them on to other readers. 
The more liberal we become with 
sharing what we know, thè more val- 
uable this magazine becomes to each 
of us! ■ 
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GIVE YOUR APPLE® 
INSTANT RECALL " 
FOR JUST $59.95 


Forget what you've heard abouf computer filing. INSTANT 
RECALL just made everything easy. No fields, no forms, no 
formats, no fooling. Nothing to set up before you get started. 

And, best of all, INSTANT RECALL comes at a no-kidding price 
of just $59.95. 

BOOKS Save your notes about everything. Keep track of appointments 
and important dates. Record minutes of your meetings. Or 
reminders about customers conferences, expenses, or just 
about anything! You can mix up as many kinds of information 
as you want, or you can organize different files on different 
diskettes. Either way, INSTANT RECALL finds what you've filed 
thè instant you ask, whether or not you remember what's 
there. 

If you've got an Apple II® or Apple II Plus® with at least 48K, 
one disk drive and Applesoft in ROM, what are you waiting for? 

To find your nearest dealer or to order, cali 800-428-3696 or 
317-298-5566 and ask for Operator 372. In Canada, contact 
Lenbrook Industries, Ltd., Scarborough, Ontario. 

SAMS BOOKS AND SOFTWARE 

Howard W. Sams & Co., Ine. 

4300 West 62nd Street 
PO.Box 7092 
Indianapolis, IN 46206 

Instant Recali is a trademark of Howard W. Sams & Co., Ine. 

Apple II and Apple II Plus are registered trademarks of Apple Computer, Ine. AD372 
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The Assembly Advantage 


by Randy Hyde 


Speedy Integers 


L ast time I discusseci how vari- 
ables are defined in a SPEED/ 
ASM program. One byte must be re- 
served for a character variable, two 
bytes for an integer variable, eight 
for a floating point variable, and 
(n + 2) bytes must be reserved for a 
string variable. Now I’il describe how 
to perform integer arithmetic using 
thè SPEED/ASM package. 

Before describing how to deal with 
integer values in SPEED/ASM, I 
think a brief review concerning thè 
declaration of integer variables is in 
order. As I mentioned last time, 
SPEED/ASM integers require two 
bytes of Storage in RAM memory. 
While there are many ways to reserve 
two bytes of Storage for an integer, I 
prefer to define an integer variable 
using thè ADR pseudo-opcode thus: 
<name> ADR 0 

where <name> is thè variable name 
with which I wish to reference thè in¬ 
teger value. For example, to declare 
thè integer variables I, J and K, I 
would use thè statements: 

I ADR 0 
J ADRO 
K ADRO 

Integers on thè 6502 consist of two 
bytes; thè first eight bits (byte) com- 
prise thè low order byte (L.O. byte) 
and thè second eight bits of thè in¬ 
teger comprise thè high order byte 
(H.O. byte). A single byte can hold 
any numeric value in thè range 0. . . 
255. Two bytes (taken as an unsigned 
integer) can be used to represent 
values in thè range 0. . .65535. The 
SPEED/ASM package uses a mod- 
ified form of thè binary numbering 
System called thè two’s complement 


Address correspondence to Randy Hyde, 
Lazer MicroSystems, 1791 Capital, Corona, 
CA 91720. 


numbering System. A pure binary 
numbering System cannot be used to 
represent negative values so thè use of 
thè binary number System is quite 
restrictive. The two’s complement 
number System divides thè unsigned 
range in half and uses half of thè 
possible values to represent thè 
numbers 0. . .32767 and thè other 
half of thè available values to repre¬ 
sent numbers in thè range -32768. . . 
-1. Since SPEED/ASM uses thè 
same two’s complement format em- 
ployed by Basic, SPEED/ASM’s nu¬ 
meric range ( - 32768. . . 32767) is 
thè same as Basic’s. 

Always remember that SPEED/ 
ASM variables must be defined out- 
side thè range of your code. That is, 
during thè execution of your program 
thè 6502 must never jump to or fall 


through to a variable location. The 
6502 would extract thè data at that 
location and attempt to execute it as a 
valid 6502 instruction—usually with 
undesirable results. A well written 
SPEED/ASM program will have its 
variable declarations at thè end of thè 
program, after thè JMP EXIT in¬ 
struction (or whatever other method 
you use to terminate program execu¬ 
tion—see Part One of this series). A 
good format for your SPEED/ASM 
programs is shown in Example 1. 

Once you’ve defined an integer 
variable, thè next step is to manip- 
ulate thè data it holds. There are 
essentially ten integer operations avail¬ 
able to thè SPEED/ASM program- 
mer: loading a variable with a value, 
copying thè contents of one integer 
variable to another, thè absolute val- 


(Put thè SPEED/ASM equates here) 


EXIT 

EQU 

$FF69 


’ 

JSR 

INIT 

;Always cali INIT first. 

; (Your 

SPEED/ASM program goes here) 



JMP 

EXIT 

;Used to terminate thè program 


; Variable declarations go here, eg: 

I ADR 0 

J ADR 0 

; etc. 

END ;Required by LISA for end of program. 

Example 1. 
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Flu<* J,UUU new applications 
intoyour Apple: 


THE CP/M Card™ plugs CP/M Plus™ into your Apple. 

The CP/M Card gives you thè option of running your Apple II 
with thè speed and capability of a professional Z-80 System 
with CP/M'--compatibile software. You plug in thè CP/M 
Card. Then choose CP/M or your standard Apple software 

at your option. 

Plug into a big, new world of software. 

The CP/M Card gives you instant access to thè world's largest 
selection of microcomputer software—more than 3,000 
CP/M-compatible applications, languages, and 
programming Utilities. So, you, too can use pro¬ 
fessional business programs such as Wordstar,* 

SuperCalc, 1 " Condor,™ and other high-performance 
software from Day One. Yet, you stili have access 
to your present library of Apple software. 

Plug into incredible performance. 

Together, thè ultra-fast CP/M Card and 
CP/M Plus run applications up to 


300% faster than your Apple System! The CP/M Card is thè 
only Apple II performance package that offers thè speed and 
efficiency of CP/M Plus. 

A plug about quality. 

The CP/M Card was designed and built by Digital Research, 
thè creators of CP/M, and Advanced Logic Systems, thè most 
respected manufacturer of Apple performance products. So 
you know thè CP/M Card is thè most perfectly integrated 
Apple performance package you can buy. 

Why just keep plugging along? The CPA1 Card 
provides everything you need—including 64 K of 
on-board memory, CP/M Plus, CBASIC; 
GSX™-80 and full documentation—for just S399. 

Now available through thè CP/M librare-. 

See your locai microcomputer dealer today. Or 
contact Advanced Logic Systems, 1195 East 


* i , | _ ■ o ._Arques Ave., Sunnyvale, CA 94086 (800) 

Advanced Logic Systems 538-8177. (in caiifomia (4os) 730-0306.) 


The CP/M Card for your Apple II. 

Also available for thè Apple Ile. 


CP/M, CP/M Plus, thè CP/M Card and CBASIC are either trademarks or registered trademarks of Digital Research Ine. Z-80 is a registered trademark of Zilog, Ine. 
Wordstar is a registered trademark of MicroPro International Corporation. SuperCalc is a trademark of Sorcim Corporation. Condor is a trademark of Condor Computer 
Corporation. GSX-80 is a trademark of Graphics Software System. Apple is a registered trademark of Apple Computer, Ine. 9 1982 Digital Research Ine 
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The Assembly Advantage 



CLC 

Always before an addition 

LDA I 

Add L.O. byte of I to thè 

ADC J 

L.O. byte of J and 

STA K 

store sum in L.O. byte of K. 

LDAI+1 

Add H.O. byte of I to thè 

ADCJ+l 

H.O. byte of J and store thè 

STA K +1 

sum in thè H.O. byte of K. 


Example 2. 


SEC 

Carry must be set before a subtraction 

LDA I 

Subtract thè L.O. byte of J from 

SBC J 

I and store thè difference 

STA K 

into thè L.O. byte of K. 

LDAI+1 

Subtract thè H.O. byte of J from 

SBC J +1 

thè H.O. byte of I and store thè 

STA K + 1 

difference into thè H.O. byte of K. 


Example 3. 


ue function (ABS), negation, addi- 
tion, subtraction, multiplication, di- 
vision, modulo (remainder) and thè 
random number function. Beyond 
these computational capabilities, thè 
ability to input and output integers is 
also desirable. 

Addition and subtraction are han- 
dled so easily in 6502 machine code 
that SPEED/ASM doesn’t include ad¬ 
dition and subtraction routines. If 
you wanted to add I and J and store 
thè sum in K you would use thè code 
in Example 2. 

The CLC (clear carry) instruction 
absohitely must precede thè addition 
sequence. Failure to clear thè carry 
flag before performing thè addition 
operation may result in an intermit- 
tent bug in your program. This addi¬ 
tion sequence is almost identical to 
thè Basic statement: 

K = I + J 

To perform a subtraction in 6502 
assembly language (or SPEED/ASM), 
use thè sequence in Example 3. Note 
that thè carry flag must be set (using 
thè SEC instruction) before perform¬ 
ing thè subtract sequence. Failure to 
set thè carry before performing a sub¬ 
traction may'yield unpredictable re- 
sults. The subtraction sequence 
above is roughly equivalent to thè 
Basic statement: 

K-I-J 

If you need to add a Constant to an 
integer variable (instead of adding 
two integer variables together) thè § 
and / operators can be used to specify 
constants in thè 6502 operand field. 
The § is used to specify thè L.O. byte 
of an integer Constant and thè / is 
used to specify thè H.O. byte of an 
integer Constant. If you wanted to 
add thè Constant 4369 to thè integer 
variable I and leave thè result in K 


CLC 


LDA 

I 

ADC 

#4369 

1 STA 

K 

LDA 

1 + 1 

ADC 

/4369 

STA 

K + 

Example 4. 


CLC 


LDA 

#1-5639 

ADC 

J 

STA 

K 

LDA 

/1-5639 

ADC 

J + l 

STA 

K + l 

Example 5. 


you would use thè code in Example 4. 

This would produce thè desired 
results. If you wanted to use a 
negative Constant, LISA v2.5 re- 
quires that you preface thè negative 
value with an exclamation mark. 
LISA v3.0 imposes no such restriction 
(see Example 5). 

Testing for Overflow and Underflow 

As I mentioned, thè 6502 addition 
and subtraction operations are only 
rough approximations of thè listed 
Basic statements. The difference be- 
tween thè assembly-language and 
Basic statements is in thè way Basic 
checks for overflow or underflow. In 
Basic, if you attempt to add 32000 to 
32000 you will get a “>32767” error. 
In assembly language you will end up 
with thè value - 1536 in variable K, 
and no error will be reported. When 
I was learning addition in grade 
school I was taught that 32000 + 
32000 equals 64000, not - 1536. 

If you can live with a possible 
overflow or underflow, thè above se- 
quences should work just fine. If you 
need to report an error if overflow oc- 
curs, you must check thè 6502 over¬ 
flow flag after performing an addi¬ 
tion or subtraction. After an addition 
or subtraction thè 6502 overflow flag 
will be clear if thè result is within 
range and set if it is out of range. The 
6502 BVC (branch if overflow clear) 


and BVS branch if overflow set) in- 
structions can be used to check for an 
overflow or underflow condition (see 
Example 6). 

Initializing and Copying 
Integer Variables 

The MOVE and LOAD routines 
are used to copy and initialize integer 
variables in a SPEED/ASM program. 
LOAD lets you initialize an integer 
variable with an integer Constant and 
MOVE lets you copy thè contents of 
one integer variable into another. 

The LOAD command uses thè 
calling sequence: 

JSR LOAD 

ADR <value>,<name> 

This routine copies thè two-byte in¬ 
teger <value> into thè variable speci- 
fied by <name>. For example, to 
load thè value 3765 into thè variable I 
you would use thè statement: 

JSR LOAD 

ADR 3765,1 

To load a negative number into thè 
variable LISA 2.5 users must preface 
thè negative number with thè ex¬ 
clamation point (!). To load -438 
into thè variable I you should use thè 
statement(s): 

JSR LOAD 

ADR !-438,1 

LISA 3.0 users should omit thè ex¬ 
clamation mark. These two state- 
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worth 



printer generates a full-page letter in quiet: only 65dB. It's durable. It boasts 

78 seconds. The least expensive 40 cps a unique new autoload feature that auto¬ 
printer does it in 36. Only 42 seconds matically loads paper to one of tour pre- 

difference...for twice thè price. selected positions with thè touch of a 


At only $895, thè Transtar 130 letter- 
quality printer makes speed its only 
compromise. Shannon-text rated at 
16 cps, thè Transtar 130 gives you better 
printing quality than any 40 cps printer. 
It allows you thè full range of word- 
processing functions such as proportionai 
spacing, superscript, subscript, under- 
scoring and a true boldface. The 130 is 
"plug and go" compatible with thè best- 


button. And, as if that weren't enough, 
its end-user warranty runs a full six 
months—twice that of most of its com- 
petitors. 

Affordable and loaded with all thè 
features of printers costing twice as 
much, thè Transtar 130 letter-quality 
printer retails for less than $900. But 
it's up to you: Is 42 seconds really 
worth $1000? 


Transtar 

Box C-96975, Bellevue, Washington 98009 
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EXIT 


GOODADD 


GOODSUB 


EQU 

•FF69 


CLC 



LDA 

I 


ADC 

J 


STA 

K 


LDA 

1 + 1 


ADC 

J + l 


STA 

K + l 


BVC 

GOODADD 

;If error then 

JSR 

PRINT 

;print in error 

BYT 

“Error >32767”,CR,0 

;message and 

JMP 

EXIT 

;quit thè program. 

... 


; Continue here if 

SEC 


;no overflow 

LDA 

I 


SBC 

J 


STA 

K 


LDA 

1 + 1 


SBC 

J + l 


STA 

K + l 


BVC 

GOODSUB 


JSR 

PRINT 


BYT 

“ErroK - 32768”,CR,0 


JMP 

EXIT 



Example 6. 
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Listing 1 . SPEED/ASM equate file. 

08u0 

i 


TU, "SPEED/ASM Equates" 

08U0 

2 

• 


08U0 

3 

********************************** 

08U0 

4 

* 

* 

08u0 

5 

* LISTING CHE: SPEED/ASM equate * 

0800 

6 

* 

file. * 

08U0 

7 

* 

* 

08u0 

8 

********************************** 

08u0 

9 

♦ 


08u0 

10 

• 


08U0 

11 

? GENERAL RJRPOSE EQUATES 

08U0 

12 

• 


0000 

13 

FORASAV 

EP2 0 

0001 

14 

FORXSAV 

EPZ FORASAV+1 

0002 

15 

FORYSAV 

EPZ FORXSAV+1 

0003 

16 

PORZPG 

EPZ FOKYSAV+1 

0005 

17 

DESTADR 

EPZ FORZPG+2 

0007 

18 

PTRADR 

EPZ DESTADR+2 

0009 

19 

ISIMMED 

EPZ PTRADR+2 

OOOA 

20 

OP 

EPZ ISIMMEEH-1 

oooc 

21 

MAXLEN 

EPZ OPt-2 

000D 

22 

VALUE 

EPZ MAXLHN+1 

000F 

23 

DIGIT 

EPZ VALUE+2 

0010 

24 

LEAD0 

EPZ DIGIT+1 

0011 

25 

JMEADR 

EPZ LEAD0+1 

0013 

26 

COUWT 

EPZ JMPADR+2 

0014 

27 

GOTLN 

EPZ COOlfNT 

0015 

28 

LINEINDX 

EPZ QOTHJ+1 

0016 

29 

SIGN 

EPZ LINEINDX+1 

0017 

30 

AGL 

EPZ SIGNtl 

0018 

31 

ACH 

EPZ ACL+1 

0019 

32 

XTNDL 

EPZ ACH+1 

001A 

33 

XTNDH 

EPZ XTNDL+1 

001B 

34 

AUXL 

EPZ X7NDH+1 

001C 

35 

AUXH 

EPZ AUXL+l 

0800 

36 

i 


0033 

37 

PROMPT 

EPZ 533 

004E 

38 

RNDL 

EPZ S4E 

004F 

39 

HNDH 

EPZ 54F 

0100 

40 

STACK 

EQU $100 

0200 

41 

INRJT 

EQU $200 

0800 

42 



0800 

43 
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Listini!, continued. 


ments are comparable to thè Basic 
statements: 

1 = 3765 
and 
1= -438 

respectively. Please note that thè § 
and / operators are not required be- 
fore thè Constant values. This is an 
unfortunate inconsistency, so you 
should take extra care to avoid either 
placing thè § or / symbols here, or 
leaving thè § and I symbols out of thè 
operand field of thè 6502 LDA or 
other arithmetic instruction. Re- 
member, thè LOAD routine is used 
to load a Constant value into an in- 
teger variable. If you use a variable 
name as thè first operand to thè 
LOAD routine, thè address of that 
variable, not its current contents, 
will be loaded into thè destination 
variable. 

The MOVE routine copies thè con¬ 
tents of one integer variable into 
another. The MOVE command uses 
thè syntax: 

JSR MOVE 

ADR <namel>,<name2> 

MOVE copies thè contents of 
<namel> into <name2>. So if you 
wanted to copy thè contents of vari¬ 
able ] into variable I you would use 
thè statement: 

JSR MOVE 

ADR J,I 

This is comparable to thè Basic state¬ 
ment: 

I-J 

Always remember that MOVE copies 
thè contents of an integer variable in¬ 
to another variable. If you use a Con¬ 
stant as thè first operand (or second 
operand for that matter), MOVE 
will simply go to thè address in 
memory specified by that Constant, 
get thè two bytes, and store them into 
thè destination variable. 

I should point out that SPEED/ 
ASM does very little type and range 
checking. MOVE and LOAD simply 
move values around. They don’t care 
if you’re actually dealing with integer 
variables. They store two bytes into 
thè address you specify regardless of 
whether thè variable is a character, 
integer, floating point, string var- 
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atlantic ™ upto 

Software DISCOUNT 

9 Spinning Wheel Rd. Monroe, CT 06468 Apple—Atari—IBM 


GAMES 

Pfogram 

Stare ross 
Seatox 

Mask of thè Sun 
Curse of Ra 
Freefall 

Ali Baba & thè Forty Thieves 

Biade of Blackpool 

Tubeway 

Spy's Demise 

Neptune 

Aztec 

The Prisoner II 

Pinball Constructlon Set 

Tunnel Terror 

Twerps 

Inferno 

Chop Lifter 

Bandits 

Audex 

The Arcade Machine 
Castle Wolfenstein 
Star Blazer 
Snack Attack 
Cannonball Blitz 
Escape from Rungistan 
Swashbuckler 
Serpentine 
Ultima 

Night Mission Pinball 

Zork I, II, or III 

Flight Simulator 

Wizard and thè Princess 

Deadline 

Time Zone 

Goldrush 

Congo 

Fly Wars 

County Fair 

Minotaur 

Lemmings 

Cyclod 

Nightmare Gallery 
Sherwood Forest 
The Queen of Phobos 
Rendezvous 
Wizardry 

Knight of Diamonds 
Frogger 
Kabul Spy 
Sargon II 
Way Out (3D) 

Borg 

Cross Fire 
Cyborg 

Davitì’s Midnight Magic 
Marauder 


Program 

List Price 

Our Price 

DB Master 

229.00 

159.00 

DB Master Utility Pak 1 

99.00 

68.00 

DB Master Utility Pak 2 

99.00 

68.00 

D Base II 

700.00 

460.00 

PFS: Report 

95.00 

68.00 

PFS: Graph 

125.00 

90.00 

Visitrend/Vislplot 

300.00 

224.00 

Visicalc 3.3 

250.00 

184.00 

The General Manager 

229.95 

151.74 

Magic Window II 

149.95 

105.00 

Versaform 

389.00 

268.00 

Screenwriter II 

129.95 

93.50 

Word Nandler 

199.00 

137.50 

Super Text 40/80 

175.00 

129.00 

Wordstar 

495.00 

335.00 

Mailmerge 

250.00 

172.50 

The Dictionary 

99.95 

71.95 

Supercalc (Req. Softcard) 

295.00 

203.50 

Letter Perfect 

149.95 

107.95 

Sensible Speller 

125.00 

90.00 

1 st Class Mail 

74.95 

53.95 

Reai Estate Analyzer II 

195.00 

134.50 

Pie Writer 

149.95 

105.00 

Speli Star 

250.00 

172.50 

Magic Mailer 

99.95 

50.00 

Pascal Programmer 

125.00 

89.00 

Data Fax 

199.00 

139.00 

NEW RELEASES 

HARDWARE 

Program Our 

Printers 

Our 

Price 


Price 

Spider Raid 22.45 

Okidala 


Snooper Troops 1 or 2 32.50 

Microline 82A FT 

439 

Story Machine 25.30 

Microline 83A FT 

689 


Beneath thè Apple 
Manor (Special Ed.) 21.65 

Starmaze 25.30 

Gallactic Attack 21.65 

Pesi Patrol 20.55 

The Dark Crystal 27.45 

Final Conflict 25.35 

Shuttle Intercept 25.35 

Lazer Bounce 25.35 

Zero-Gravity Pinball 20.55 

Federation 20.55 

Demon's Forge 20.55 

interstellar Sharks 22.65 

lunar Leepers 20.55 

U-Boat Command 21.70 

Mars Cars 20.55 

Money Munchers 20.55 

High Orbi! 20.55 

The Cosmic Balance 25.95 

Juggle’s Rainbow 31.20 

Bumble Games 41.25 

Gertrude's Secrets 51.55 

Lazer Silk 20.55 

Firebug 17.10 

Zenith 24.00 

Phazer Fire 20.55 

Crazy Mazery 20.55 

Missing Rings 27.45 

Chess (Odesta) 52.45 

Succession 20.55 

Battle of Normandy 25.95 

Cytron Masters 25.95 

LafJpak 24.00 

Adventure to Atlantis 28.95 

International Gran Prix 20.55 


Microline 84A FT(S) 
Microline 84A FT (P) 
NEC 

8023A w/Graph. Par 
Smith Corona TP-1 
Brother 
HR-i Parallel 
ProWriter 
8510AP Parallel 
8510ACD Serial 


Amdek Color I 
Amdek Color II 
Amdek Color III 
Amdek RGB Interface 
Amdek 300G Hi-Res G 
Sanyo 9' Bl. & Wh. 
Sanyo 9" Green 
Sanyo 12" Green 
Sanyo 13" Color L/R 
NEC 12" Color 
USI 12" Amber 
USI 12" Green 


Micro SCI A2 
Micro SCI A2 w/contr 
Rana Elite 1 (add on) 
Rana Elite 1 w/contr 


SPECIAL DISCOUNTS 

Nibbles Away II 
Microsoft Premium System 
Wildcard 
PFS: File 

Cali on Franklin computer 
Cali on Apple computer 

HOBBY 


Program 

List 

Qj- 

P-ics 

Dos Boss 

2~ 

16 50 

The Graphics Magician 

59 9: 

44 95 

The Complete Graphics Sys. 

63 95 

52 45 

Special Effects 

39.95 

29.95 

Utility City 

29.50 

20.25 

Lisa 2.5 

79.95 

54.95 

Lisa Educational System 

119.95 

82.45 

Apple Mechanic 

29.50 

20.25 

TASO Compiler 

175.00 

126.95 

Alpha Plot 

39.50 

27.25 

Graforth II 

75.00 

56.25 

Zoom Graphix 

39.95 

29.95 

Bag of Tricks 

39,95 

29.95 

Merlin Assembler 

64.95 

47.00 

Merlin Combo Pack 

119.95 

80.45 

Hi-Res Secrets 

124.95 

82.50 

Back It Up II Plus 

59.95 

41.00 

HOME 

Program 

List 

Our 

Price 

Home Accountant 

74.95 

51.50 

ASCII Express 

79.95 

57.95 

Data Capture 4.0 

65.00 

44.65 

Typing Tutor II 

24.95 

18.00 

Transend 1 

89.00 

67.50 

SAT English 1 

30.00 

21.65 

Master Type 

39.95 

27.45 

ACE 

39.95 

28.95 

Visiterei 

100.00 

78,25 

Facemaker 

34.95 

25.30 


ACCESSORIES 


System Saver 
Hayes Micromodem II 
Hayes Chronograph 
The Joyport 
TG Paddles 
TG Joysticks 
TG Select-A-Port 
Microsoft Softcard 
Videx Vidioterm Card 
The Grappler 
Microsoft RAM Card 
Kraft Joystick 
Videx Enhancer II 
Wizard 80K (Apple) 
Wizard 16F (Apple) 
S.A.M. Automatic Mouth 
Apple Cat II 


MEDIA 


Elephant 5'A SSSD/10 
Verbatlm 5% SSSD/10 
Maxell 5V< SSDD/10 


MoeterCord 


For fast delivery send certified check, cashiers check or 
money order. We also accept C.O.D’s, MasterCard and Visa. 
(Include card # and expiration date.) Conn. residents add 
7.5% sales tax. Include $2.50 for shipping. We ship same 
day for most orders. Prices subject to change without notice. 


ORDERS ONLY 

TOLL FREE - 7 DAYS/WK 

1 - 800 - 243-4536 


For Inquiries and Connecticut Orders Cali (203) 268-4596 

If something you would like is not listed, just cali. If we don’t have it, we can get it. 
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Removes 
thè drudgery 
from your 

Genealogy 


• 6 types of charts and sheets 

• Indices 

• User fields 

• Notes, footnotes, and sources 

• No limits 

• Adapts to your hardware 

• Comprehensive 

• Easy to use 

-And mudi, much More 


Send for brochure and sample printouts. 
Family Roots indudes detailed 
manual and diskettes. 

For your Apple II or IBM PC 

Price: $185 plus $3.50 Postage 
Visa, MasterCard accepted 

Quinsept, Ine. 

P.O. Box 216 
Lexington, MA 02173 
(617) 862-0404 


Circle 311 on Reader Service card. 





IMPROVED 

quick access to 
personal or business 
information with 

dataKGY|Der 

From personal records, to 
mailing labels, to business 
transactions dataKEYper 
is doing it all! You too can 
create, edìt, sort and 
format reports with thè 
versatile, easy to use, 
menu-driven ESP data man¬ 
agement System . . . 
dataKEYper. 

NEW features Include: 

• Automatic multiple 
record updating (global 
change). 

• Transaction (ile 
processing. 



* Purge and archive files 
created by 
dataKEYper 
For more information 
cali or mite 



esp compire 

RESOURCES ine. 

Dept. 5C 


0 ASH STREET • HOLUS, N.H. 03040 
TEL. (603)465-7264 
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Listing continued. 


0000 

44 

FALSE 

EQU 0 

0001 

45 

TOUE 

EQU 1 

008D 

46 

CR 

EQU S8D 

08U0 

47 

t 


0800 

48 

r 


08u0 

49 

; "IF" 

STATEHENT BQUATES 

08UO 

50 



OOED 

51 

BQ 

EQU 

00 A3 

52 

NE 

BQU *#" 

OOBE 

53 

or 

EQU ">" 

00BC 

54 

LT 

EQU "<" 

BDBE 

55 

GE 

BQU ">»|"=’*256 

BDBC 

56 

LE 

EQU "<"l“="*256 


08u0 

08U0 

08U0 

08u0 

0800 

0800 

0800 

0800 

08u0 

0800 

0800 

0800 

0800 

0800 


57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 


SPEED/ASM ENTRY POIN1S 


NOTE: THE EQUATE OF HJTC MUST 
BE CHAN3ED IF YOU REVOCATE 


0800 


71 

; ormai than $78oo 

08U0 


72 

r 


7800 


73 

pure 

EQU $7800 

7803 


74 

GETC 

EQU RJTC+3 

7806 


75 

SA5L 

EQU GEJTC+3 

7809 


76 

SAFC 

EQU SAGW-3 

7 eoe 


77 

HOME 

BQU SAPC+3 

780F 


78 

READLN 

EQU H0ME+3 

7812 


79 

INIT 

EQU READIN+3 

7815 


60 

POR 

BQU INIT+3 

7818 


81 

PORO 

EQU POR+3 

781B 


82 

NEXT 

EQU PORO+3 

781E 


83 

IFI 

EQU NEXT+3 

7821 


84 

IFI0 

EQU IFI+3 

7824 


85 

IFS 

BQU IFI0+3 

7827 


86 

IFS0 

EQU IFS+3 

782A 


87 

MOVE 

EQU IFS0+3 

782D 


88 

LQAD 

BQU MOVE+3 

7830 


89 

M0VS 

EQU LOAD+3 

7833 


90 

IESTR 

EQU HOVS+3 

7836 


91 

PRINT 

EQU LDSTO+3 

7839 


92 

EKTSTR 

EQU PRIOT+3 

783C 


93 

PRTINT 

EQU PKCS'ra+3 

783F 


94 

RDSTR 

EQU FRTIOT+3 

7842 


95 

RDINT 

BQU RDSTR+3 

7845 


96 

CKXGOTO 

EQU RDINT+3 

7848 


97 

CASE 

EQU CNXGOTOT3 

784B 


98 

GASEI 

BQU CASE+3 

784E 


99 

INSET 

EQU CASEI+3 

7851 


100 

NOTINSET BQU INSBW3 

7854 


101 

ABS 

EQU NOT1NSET+3 

7857 


102 

NEG 

EQU ABS+3 

785A 


103 

MUL 

EQU NEG+3 . 

785D 


104 

DIV 

EQU MUDr-3 

7860 


105 

M0D 

EQU DIV+3 

7863 


106 

RND 

EQU MOTH-3 

7866 


107 

SUBSIR 

equ wih-3 

7869 


108 

HCEX 

EQU SUBSK+3 

786C 


109 

LENGTH 

EQU DDEX+3 

786F 


110 

OCNCAT 

EQU LENCTH+3 

7872 


111 

GEIWZPG 

EQU ONCAT+3 

7875 


112 

RDFP 

EQU GEIHZIG+3 

7878 


113 

PRIE 

EQU RDFP+3 

787B 


114 

PRTF 

EQU FKTE+3 

787E 


115 

FATO 

EQU rKTFF3 

7881 


116 

FSUB 

EQU FAEO+3 

7884 


117 

FMUL 

EQU FSUB+3 

7887 


118 

FDIV 

BQU FMUW3 

788A 


119 

FLT 

EQU EOIV+3 

788D 


120 

FIX 

EQU FLT+3 

7890 


121 

FNEG 

EQU FIX+3 

7893 


122 

FAraro 

EQU ENEGf3 

7896 


123 

FSUBTN 

EQU FADOTN+3 

7899 


124 

FTIMES 

EQU FSUBTtt+3 

789C 


125 

FINTO 

EQU FTIMES+3 

789F 


126 

IFF 

EQU FDJTO+3 

78A2 


127 

MOVFP 

EQU IFF+3 

08U0 


128 

? 


0800 


129 


END 


;F0R USE BY S/A CNLY- SEE DOC. 

jfintinit un 

;H0ME AND CLEAR 


;USED BY SPEED/ASM 


48 Èider May 1983 


Listing continued. 










-The Assembly Advantage- 


iable, or even a 6502 instruction. 
Therefore you should take care that 
thè destination operand of thè LO AD 
routine and both operands of thè 
MOVE routine are thè names of 
properly defined integer variables in 
your program. 

The Absolute Value 
and Negation Routines 

SPEED/ASM provides two rou¬ 
tines for negating and calculating thè 
absolute value of an integer variable. 
The ABS routine (see Listing 1 for thè 
equate for ABS) is invoked using thè 
calling sequence: 

JSR ABS 
ADR <name> 

This routine will take thè variable 
whose name appears after thè ADR 
pseudo-opcode, compute its absolute 
value, and stare thè absolute value 
back into thè variable. This routine 
performs thè same function as thè 
Basic statement: 

I = ABS(I) 

Upon return from thè ABS routine 
thè overflow flag will be clear if thè 
absolute value function was per- 
formed properly. If thè user attempt- 
ed to take thè absolute value of 
- 32768 (an errar condition) then thè 
overflow flag will be returned set. 
You can use thè BVC and BVS in- 
structions to test for this errar con¬ 
dition. 

The SPEED/ASM negate routine is 
used like thè ABS routine; thè only 
difference is that thè sign is inverted 
with thè negate routine instead of 
always returning a positive value (as 
with thè ABS function). If thè integer 
variable was negative, thè NEG rou¬ 
tine will make it positive. If thè 
variable was positive, NEG will 
make it negative. NEG uses thè call¬ 
ing sequence: 

JSR NEG 
ADR <name> 

and is equivalent to thè Basic state¬ 
ment: 

1= -I 

Since ABS and NEG operate on thè 
variable in place, you may want to 
use thè MOVE routine to copy thè 
variable into another location before 


Do you want 
thè #1 Seller 
or thè 

#1 Financial 
System? 
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MONEY MAGAZINE — Nov. 1982 

"Among bookkeeping programs, earns high marks and is easy to use.” 

CREATIVE COMPUTING - Jan. 1983 

"The documentation is thorough, easily read, and complete. " 

"The program is so easy to use that rarely will reference have to be made to thè 
manual. " 

SOFTALK - Jan. 1982 

"For thè home user (and perhaps in some less complex small business), thè best 
package we evaluated was The ACCOUNTANTby Decision Support Software." 

"The ACCOUNTANT does. indeed, make financial management a simple and 
straightforward procedure. " 

INFOWORLD - Jan. 3/10, 1983 

"Complete flexible financial data base package for thè home user." 

"... exceptionally fast. .. . highly recommend." 

FEELING n - MARCH 1983 

A magazine of Appio software and hardware evaluation. "Rated A ... a good 
buy." 

The ACCOUNTANT 

Finance Data Base System™ 

Decision Support Software Ine. 

1438 Iionwood Drive, McLean, VA 22101 • (703) 241-8316 • Orders Only: (800) 368-2022 

Apple™, IBM 1 ®, VisiCalc™ are trademarks of Apple. IBM. and VisiCorp. respectively. 
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Listitig continued. 

SYMBOL TABLE SORTE» ALPHABETICALLY 


ABS 

7854 

ACH 

0018 

ACL 

0017 

AUXH 

001C 

AUXL 

001B 



CASE 

7848 

CASEI 

784B 

CONCAT 

786F 

COUNT 

0013 

CR 

008D 

JSR 

MUL 

DESTADR 

0005 

DIGIT 

000F 

DIV 

785D 

EQ 

00BD 

FADD 

787E 

ADR 

TEMP.X.TEMP 

FADDTN 

7893 

FALSE 

0000 

FDIV 

7887 

FINTO 

789C 

FIX 

788D 



FLT 

788A 

FMUL 

7884 

FNEG 

7890 

FOR 

7815 

FORD 

7818 



FORASAV 

0000 

FORXSAV 

0001 

FORYSAV 

0002 

FORZPG 

0003 

FSUB 

7881 

CLC 


FSUBTN 

7896 

FTIMES 

7899 

GE 

BDBE 

GETC 

7803 

GELWZPG 

7872 

LDA 

TEMP 

GOTLN 

0014 

GT 

00BE 

HOME 

780C 

IFF 

789F 

IFI 

781E 



IFIO 

7821 

IFS 

7824 

IFS0 

7827 

INDEX 

7869 

INIT 

7812 

ADC 

#2 

INPUT 

0200 

INSET 

784E 

ISIMMED 

0009 

JMPADR 

0011 

LDSTR 

7833 

STA 

TEMP 

LE 

BDBC 

LEAD0 

0010 

LENGTH 

786C 

LINEINDX 

0015 

LQAD 

782D 

LDA 

TEMP + 1 

LT 

00BC 

MAXLEN 

oooc 

MOD 

7860 

MOVE 

7 82A 

MOVFP 

78A2 



MOVS 

7830 

MUL 

7 85A 

NE 

00A3 

NEG 

7857 

NEXT 

781B 

ADC 

12 

NOTINSET 7851 

CNXGOTO 

7845 

OP 

000A 

PRINT 

7836 

PROMPT 

0033 

STA 

TEMP +1 

PRTE 

7878 

PRTF 

787B 

PRTINT 

783C 

PPTSTR 

7 839 

PTRADR 

0007 



RJTC 

7800 

RDFP 

7875 

RDINT 

7842 

RDSTR 

783F 

READLN 

780F 



RND 

7863 

RNDH 

004F 

RNDL 

004E 

SAGL 

7806 

SAPC 

7809 

JSR 

DIV 

SIGN 

0016 

STACK 

0100 

SUBSJR 

7866 

TRUE 

0001 

VALUE 

000D 

ADR 

X.TEMP.TEMP 

XTNDH 

001A 

XTNDL 

0019 










SYMBOL TflBLE SORTE» BY ADDRESS 


FORASAV 

0000 

FALSE 

0000 

TRUE 

0001 

FORXSAV 

0001 

FORYSAV 

0002 

FORZPG 

0003 

DESTADR 

0005 

PTRADR 

0007 

ISIMMED 

0009 

OP 

000A 

MAXLEN 

OOOC 

VALUE 

000D 

DIGIT 

000F 

LEAD0 

0010 

JMPADR 

0011 

COUNT 

0013 

GOTLN 

0014 

LINEINDX 

0015 

SIGN 

0016 

ACL 

0017 

ACH 

0018 

XTNDL 

0019 

XTNDH 

001A 

AUXL 

001B 

AUXH 

001C 

PROMPT 

0033 

RNDL 

004E 

RNDH 

004F 

CR 

00 8D 

NE 

00A3 

LT 

00BC 

EQ 

00BD 

GT 

00BE 

STACK 

0100 

INRJT 

0200 

RJTC 

7800 

GETC 

7803 

SAGL 

7806 

SAPC 

7809 

HOME 

780C 

READLN 

780F 

INIT 

7812 

FOR 

7815 

FORO 

7818 

NEXT 

781B 

IFI 

781E 

IFIO 

7821 

IFS 

7824 

IFS0 

7827 

MOVE 

7 82A 

LQAD 

782D 

MOVS 

7830 

LDSTR 

7833 

PRINT 

7836 

PRTSTR 

7839 

PRTINT 

783C 

RDSTR 

783F 

RDINT 

7842 

CNXGOTO 

7845 

CASE 

7848 

CASEI 

784B 

INSET 

784E 

NOTINSET 7851 

ABS 

7854 

NEG 

7857 

MUL 

785A 

DIV 

785D 

MOD 

7860 

RND 

7863 

SUBSTR 

7866 

INDEX 

7869 

LENGTH 

786C 

CCNCAT 

786F 

GETWZPG 

7872 

RDFP 

7875 

PRTE 

7878 

PRTF 

787B 

FADD 

787E 

FSUB 

7881 

FMUL 

7884 

FDIV 

7887 

FLT 

788A 

FIX 

788D 

FNEG 

7890 

FADDTN 

7893 

FSUBTN 

7896 

FTIMES 

7899 

FINTO 

789C 

IFF 

789F 

MOVFP 

78A2 

LE 

BDBC 

GE 

BDBE 








MOD 

Y,Z,TEMP 


TEMP = (Y MOD Z) 
TEMP = TEMP * X 
TEMP = TEMP + 2 
TEMP = X/TEMP 
TEMPI = J +3 
TEMP = TEMPI * TEMP 
I = TEMP - 55 

Example 7. 


calling thè ABS or NEG routines. For 
instance, if you wanted to perform 
thè Basic instruction, 

I = ABS(J) 

using thè SPEED/ASM statements, 

JSR ABS 

ADR J 
JSR MOVE 

ADR J,I 

does not perform thè same operation. 
It leaves thè absolute value of J in 
both I and J. While in this simple ex¬ 
ample I easily could have moved thè 


#3 

TEMPI 

J + l 

13 

TEMPI + 1 
MUL 

TEMP,TEMPI, TEMP 


TEMP 

#55 

I 

TEMP +1 
155 
1 + 1 


data into I and then taken thè ab¬ 
solute value of I, this would be im- 
possible in more complex situations. 
To handle situations like this, simply 
move J into some temporary location, 
take thè absolute value of that loca¬ 
tion, then operate on thè data in this 
temporary location as you wish. 

The Multiplication, Division 
and Modulo Functions 

The 6502 doesn’t support thè mul¬ 
tiplication, division and modulo (re¬ 
mainder) operations within its in¬ 
struction set. To make up for thè lack 
of these instructions in thè 6502 in¬ 
struction set, thè SPEED/ASM pack¬ 
age provides three routines to per¬ 
form these operations for you: The 
MUL, DIV and MOD routines. All 
three routines use thè same format 
and calling sequence. The calling se- 
quence is: 

JSR MUL ;Or DIV Or MOD 
ADR <IVAR1>,<IVAR2>,<IVAR3> 


Example 8. 


This performs thè operation: 

"<IVAR3> =<IVAR1>*<IVAR2>" 

If thè division or modulo operation 
is called, then thè operation per- 
formed is 

“<IVAR3> = <1V AR1>/<I V AR2>” 

or 

”<IVAR3> = <1V AR l>MOD<I VAR2>" 

The 6502 overflow flag is returned 
set if overflow occurred while per- 
forming a multiplication or if a divi¬ 
sion by zero occurred during thè ex- 
ecution of thè DIV or MOD routines. 
Unless you are quite sure that over¬ 
flow or underflow will not occur, you 
should always follow a cali to MUL, 
DIV or MOD with a BVC or BVS in¬ 
struction to test thè validity of thè 
result. 
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Converting Complex Equations to 
The SPEED/ASM Format 

The arithmetic routines (with thè 
exception of thè ABS and NEG rou¬ 
tines) all require exactly three param- 
eters. Basic, on thè other hand, al- 
lows a rich variety of operations 
within a single statement. In Basic 
you could type: 

I = (J + 3)*(X/(2 + X«(Y MOD Z))) -55 
Such a statement cannot be translat- 
ed to a single statement in SPEED/ 
ASM. Bather, thè statement is broken 
down into thè sequence of binary op¬ 
erations that make up this equation 
and thè individuai operations are 
handled by calls to SPEED/ASM rou¬ 
tines. The previous equation would 
be broken down to thè operations 
given in Example 7. This code would 
be converted to thè SPEED/ASM 
statements in Example 8. For pur- 
poses of clarity, thè tests for overflow 


were omitted from this code. But it 
should help demonstrate how you 
translate a Basic expression into a se¬ 
quence of SPEED/ASM routine calls. 

The Random 
Number Function RND 

The SPEED/ASM package pro- 
vides a function that returns a ran¬ 
dom number every time it’s called. 
The calling sequence is: 

JSR RND 
ADR <IVAR> 

When ever RND is called it stuffs a 


JSR 

LOAD 

ADR 

26.TEMP 

JSR 

RND 

ADR 

RNDVAL 

JSR 

MOD 

ADR 

RNDV AL,TEMP,RNDV AL 


Example 9. 


pseudo-random number in thè range 
0. . . 32767 and Stores it in thè vari¬ 
atile that follows thè JSR. If you wish 
to generate a random number in thè 
range 0. . . n then cali thè random 
number generator and use thè MOD 
routine. For example, to get a num¬ 
ber in thè range 0. . .25 you should 
use thè code given in Example 9. 

Note that thè mod of RNDVAL 
and 26 was taken. This produces a 
value in thè range of 0... 25. 

Performing I/O in SPEED/ASM 

Before discussing integer I/O in 
SPEED/ASM, I should first introduce 
character I/O, since numeric I/O is 
dependent upon character I/O. Five 
routines are associated with character 
I/O in SPEED/ASM: GETC, PUTC, 
READLN, HOME and INIT. 

The INIT routine, as I’ve already 
mentioned, must be called before 
calling any SPEED/ASM routines. In 
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Let us know 8 weeks in advance so that you won’t miss a single 
issue of inCider. Attach old label where indicated and print new 
address in space provided. Also include your mailing label when- 
ever you write conceming your subscriptìon. It belps us serve you 
promptly. Write to: 
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Subscriptìon Department 
PO Box 911 

Farmingdale, NY 11737 
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ENTRNUM 

JSR 

READLN 


JSR 

RDINT 


ADR 

J 


BVC 

GOODNUM 




Listing 2. SPEED/ASM demo program. 

OBuO 

1 


■m. "SPEH3/ASM Demo" 

08u0 

2 

; 


OBUO 

3 

******** 

************************** 

08u0 

4 

* 

* | 

OBuO 

5 

* Listing Two: SféEu/ASM demo * J 

08U0 

6 

* 

program. * 

08u0 

7 

* 

* 

08U0 

8 

********************************** i! 

08U0 

9 

; 


OBuO 

10 

7 


08u0 

11 



0000 

12 

FALSE 

BQU 0 

0001 

13 

TOJE 

EDO 1 

008D 

14 

CR 

EQU $BD 

OBuO 

15 

f 


OBuO 

16 

7 


OBuO 

17 

7 


08UO 

18 

7 


OBuO 

19 

• 


OBUO 

20 

; SPEED/ASM ENTOY POINTS 

08U0 

21 

; (Only thè equates necessary for 

OBuO 

22 

; this demo are included.) 

08uO 

23 

7 


OBuO 

24 

7 


OBuO 

25 



OBUO 

26 

7 NOTE: 

THE USUATE OF EOTC MUST 

08U0 

27 

f BE CHANGED IF YOU RELOCATE 

08U0 

28 

; SPEED/ASM TO SOME LOCATION 

OBUO 

29 

; CflBER THAN $7800 

OBuO 

30 



7800 

31 

pure 

BQU $7800 

7803 

32 

Gaie 

EQU HJTC+3 

7806 

33 

SftGL 

EQU GETC+3 ;FCH USE BY S/A UJLY- SEE DOC. 

7809 

34 

SAPC 

BQU SK3W3 ...... . . 

780C 

35 

HOME 

BQU SAPC+3 ,-BOME MD CLEAR 

780F 

36 

READLN 

EQU HCME+3 

7812 

37 

INIT 

EQU SEADLHt3 

7815 

38 

FOR 

equ nnrt3 

7818 

39 

F0K0 

BQU FCRf3 

781B 

40 

NEXT 

BQU EORO+3 

781E 

41 

IFl 

BQU NEXW3 

7821 

42 

ino 

BQU in+3 

7824 

43 

IFS 

EQU IFI0+3 

782/ 

44 

IFS0 

EQU IFS+3 

782A 

45 

MOVE 

BQU IFSO+3 

782D 

46 

LQAD 

EQU MCVE+3 

7830 

47 

M0VS 

BQU L0AEH-3 

7833 

48 

IDSTR 

BQU HWS+3 

7836 

49 

PRIKT 

BQU UYSffi+3 

7839 

50 

PRESTO 

B3U PRMW-3 

783C 

51 

Htrnrr 

BQU PFOSTO+3, 

783F 

52 

FOS1R 

EQU HOTNT+3 

7842 

53 

RDINT 

EQU HDSTR+3 

7845 

54 

CHXGGID 

EQU PDIWT+3 Listing continued. 



particular it must be called before 
performing any I/O routines since 
several pointers and counters used by 
thè I/O package are initialized by 
INIT. Faùing to cali INIT before per- 
forming an I/O operation may result 
in garbled data. 

HOME is used to clear thè screen 
and position thè cursor in thè upper 
left corner. This routine is included in 
thè SPEED/ASM package to obtain a 
certain amount of machine indepen- 
dence. By placing this jump in thè 
SPEED/ASM code (instead of thè 
user program), it will have to be 
changed in only one location if you 
want to move thè program to a com¬ 
puter other than thè Apple II. Ver- 
sions of SPEED/ASM wiU eventually 
be available for thè Atari, PET, VIC 
and other 6502 computers, allowing 
you to easily move a program from 
one computer to another. HOME’s 
purpose is to help minimize thè ma¬ 
chine dependent code. 

All input from thè System console is 
handled line by line. Any time you 
read a character, number or string 
from thè keyboard, thè SPEED/ASM 
routines will read thè data from thè 
current line input buffer. If thè buff¬ 
er is empty, thè user is prompted to 
enter a new line from thè keyboard. 
This works fine until you prompt thè 
user for some input (expecting him to 
enter a new line from thè keyboard) 
and thè SPEED/ASM package uses 
thè last few characters on thè pre- 
vious line as thè input. To insure that 
thè next input performed takes its 
data from thè beginning of a new in¬ 
put line, you should cali thè 
READLN (read a line) routine to 
force thè user to enter a new line of 
data. READLN will wait until thè 
user types in a complete line of text 
and then it will continue execution 
with thè next statement following thè 
cali to thè READLN routine. 

The GETC routine reads a single 
character from thè current line buff¬ 
er and returns it in thè 6502 accumu- 
lator. If thè line buffer is empty, a 
new line is read from thè keyboard 
and GETC returns thè first character 
on that line. I must point out that if 
there are characters in thè input line 
buffer thè keyboard will noi be read. 
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ACCESS UNUMITED 
*MICRO SHOPPING CENTER 


“Percom” Hard Disk Drives For “Apple II” 

• Works with existing floppy drives 

• Plug-In Adaptability 

• Initial Unii Contains Smart Controller, Allowing Add-Ons 

• “PERCOM” QUAUTY • “PERCOM” PERFORMANCE • 

• ACCESS UNUMITED PRICE... 

5 to 20 Megabyte Units Available 
Prices Begin at $1600.00 


We bave added approximately $400,000.00 
worth of brand new business and game 
software. 

“Brother” HR1 Daisywheel Printer 

Affordable/Letter Quality/17 CPS 
Serial — New Low Price $ 849.00 
Parallel —New Low Price $ 799.00 


“ E xpanda”- 1B K Ram Board For “Apple II & Il + Only $109.95 NEW STYLE Smoked PlastiC File BOX — 
Parallel ‘‘Expanda”-Pr.nter Interface For Apple II Holds 75 Diskettes 

“Expanda”-Link Connectors Onfy $24.95 Re S' Reta '' Sale $24.95 


SPECIAL OF THE MONTH: 

NEW “Star Gemini” Printer 

Dot Matrix With Graphics, 100 CPS 

Model 10 — Reg. Retai! $499.00 Sale $425.00 

Model 15 — Reg. Retail $699.00 Sale $625.00 


“C-ltoh FIO Starwriter” Printer 

Uses “Diablo” Printwheels & Ribbons, 40 CPS 

Only $ 1595.00 

FormsTractor Sale $199.95 


“Perfect” Software 

“Perfect Writer” Reg. Retail $495.00 Sale $339.00 
“Perfect Filer” Reg. Retail $595.00 Sale $389.00 
“Perfect Cale” Reg. Retail $295.00 Sale $189.00 
“Perfect Speller” Reg. Retail $295.00 Sale $189.00 
All Four Fully Integrateti 
Reg. Retail SI680.00 

Sale $999.00 Complete 


MEDIA FOR LESS _ 

BASF .5Vi" Single Sided Doublé Density 

Lifetime Limited Warranty. reg. $44.95 now $24” bx of 10 


Beautiful/Functional Custom Computer 
Furniture From “Atlantic” & “Toor” 

CALL FOR PRICES 

“ Reg. Trademarks * Limited Time Offer/Limited Quantities • Prices subject to change without 
notice • Prices do not include state taxes 


To order or for FREE literature, cali T0LL-FREE 

1 (800) 527-3475 IjjC 

Order by phone or by mail. We accept Visa, MasterCard, cashier's 
checks, certified checks, and money orders. With personal checks, 
allow additional tìme for bank clearance. Your bankeard will not be 
charged unti! your order is shipped. On orders over $1,000, we pay 
freight (surface only) and insurance; please add $3.00 shipping and 
handling under 50 Ibs. Over 50 Ibs., add $5.00 for orders under 
$1,000.00. Texas residents add 5% sales tax. Allow 2 to 4 weeks for 
delivery. 


ATHANA complete with hub rings & one year limited warranty. 

Single sided Single density 5V4" $19.90 bx of 10 

Single sided Doublé density 5Và" $22.80 bx of 10 


Doublé sided Single density 5 Va" $29.90 bx of 10 

Doublé sided Doublé density 5'A" $33.50 bx of 10 

VERBATIM Single Sided Doublé Density $30.90 bx of 10 

Single Sided Single Density $26.90 bx of 10 


HOT OFF THE PRESSES: 

INSIDE PERSONAL COMPUTER DISK STORAGE SYSTEMS 

THE Necessary Basic Book, 

NEW From “Percom” — Only $5.95 


□ Please send me a FREE catalog. Fm not ready to order atthistime. 

Name____ 

Company Name_ 

Address ____ 

City_State_Zip _____ 

Phone Number (_)_ 

Quantity_Item Unit Price Subtotal 


Check one: State Sales Tax (Texas residents only) 

□ payment enclosed handling charge 

□ Visa □ MasterCard* Total 


Subtotal 


*!f MasterCard, ,—,— r 

numbers above name: I_ I _L 

Authorized signature, ìf charged 


Expiration 

Date: 


co-m 


ACCESS UNUMITED 
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7848 

55 

CASE EQU 000010+3 

784B 

56 

CASEI EQU CASEJ+3 

784E 

57 

IKSET EQU CASEI+3 

7851 

58 

NOTiNser eoo ntsm3 

7854 

59 

abs eoo KTrmsETa 

7857 

785A 

60 

61 

NEC EQU ABS+3 

ME, EQU NEG+3 

785D 

62 

DIV EQU HUL+3 

7860 

63 

H0D EQU DIV+3 

7863 

64 

BSD EQU MCD+3 

08U0 

65 

• 

0800 

66 


08o0 

67 


08u0 

68 

; Apple monitor equatees 

08u0 

69 


FF69 

70 

EXIT EQU 9FF69 fAddrese to quii S/A. 

0800 

71 


0800 

72 

; 

08o0 

73 

? ! 

08u0 

74 

********************************** 

0800 

75 

f 

0800 

76 


0800 

77 

! MOTE: hjit must be calla) before 

0800 

78 

; any other SPEED/ASM routine. 

0800 

79 

0800 20 12 7 8 

80 

STADI JSR INTT 

08u3 

81 

1 

0803 

82 


0803 

83 

> The following code loads 10 into 

0803 

84 

; "I* and 54 into "J" then oomputes 

0803 

85 

1 their sum, difference, product, 

0803 

86 

; quotient, and remainder. 

0803 

87 


0803 20 2D 78 

88 

JSR LORD 

0806 0A 00 12 

89 

ADR 10,1 

0809 0B 

08OA 20 2D 78 

90 

JSR LQAD 

08UD 3$ 00 14 

91 

a m 54 ,j 

0810 0B 

0811 

92 

; 

0811 

93 

1 Computa thè sum: 

oaii 

94 

; 

osa is 

95 

LOOP CLC : Always CLC before an addìtion. 

0812 AD 12 0B 

96 

ICA I 

0815 6D 14 OB 

97 

ADC J 

0818 8D 16 0B 

98 

STA SUM 

081B AD U 0B 

99 

IDA 1+1 

081E 6D 15 0B 

100 

ADC J+l 

0821 8D 17 OB 

101 

SIA SUH+1 

0824 70 69 

102 

BVS OVERFLOH ;Check for >32767. 

0826 

103 

J 

0826 

104 

; Caiculate thè difference: 

0826 

105 

; 

0826 38 

106 

ESC (Always SBC before a subtraction 

0827 AD 12 0B 

107 

IDA I 

082A ED 14 0B 

108 

SBC J 

082D 8D 1C 0B 

109 

SIA DIFFHNCE 

0830 AD a 0B 

110 

IDA 1+1 

0833 ED 15 OB 

111 

SBC J+l 

0836 8D 1D 0B 

112 

SIA DIFERNCE+1 

0839 70 54 

113 

BVS OVHtFLOW 

083B 

114 

1 

083B 

115 

; Calculate thè product: 

083B 

116 

t 

083B 20 5A 78 

117 

JSR MUL 

083E 12 0B 14 

118 

Al® i,j,FRGEuer 

0841 0B 18 0B 
0844 70 49 

119 

BVS OVERFLOH 

0846 

120 

; 

0846 

121 

f Calculate thè quotient 

0846 

122 


0846 20 5D 78 

123 

JSR DIV 

0849 14 0B 12 

124 

ADR Jfl.QUOTIHtT jJ/I, not I/J 

084C 0B 1A OB 



084F 70 3E 

125 

BVS OVERFLOH 

0851 

126 


0851 

127 

1 Calculate thè remainder 

0851 

128 

; 

0851 20 60 78 

129 

JSR M0D 

0854 14 0B 12 

ao 

ADR J,I,REMAM» 

0857 0B 1E 0B 
065A 70 33 

ai 

BVS OTHtElOf 

085C 

a2 

t 

085C 

a3 

t 

085C 

a4 

l Generate a couple of randati numbers 

085C 

as 


08SC 20 63 7 8 

136 

jsr no 

085F 20 OB 

137 

Al» RAND0M1 

0861 20 54 7 8 

138 

JSR ABS 

0864 20 0B 

139 

adr RAwoea 

0866 70 21 

140. 

BVS CVERFL0W 

0868 

141 

• 

086 8 20 63 7 8 

142 

JSR RND w • • . i ■ 

Ltsting contmued. 


The Assembly Advantage— 


Instead, thè next available character 
in thè input buffer will be retumed in 
thè 6502 accumulator. If you need to 
read thè character frora thè key- 
board, always cali READLN before 
calling GETC. 

The final character I/O routine is 
thè PUTC routine. PUTC takes thè 
character in thè 6502 accumulator 
and outputs it to thè console screen. 
One nice feature of thè PUTC routine 
is that it will automatically convert 
lowercase to uppercase if thè end user 
of your program cannot display low¬ 
ercase on his Apple. If your System 
has a lowercase adapter, like thè La- 
zer MicroSystems’ Lower Case + Plus 
and Keyboard + Plus modules, then 
you can write your SPEED/ASM pro- 
grams using easy-to-read lowercase 
without having to worry about in- 
compatibility problems, 

The READLN, GETC and PUTC 
routines are primitive routines. All 
other I/O routines can be synthesized 
from these three subprograms. When 
I talk about character operations 
we’ll return to thè discussion of thè 
GETC and PUTC routines. 

Using PRINT to Print String Literals 

I’ve already used thè SPEED/ASM 
PRINT routine in several examples. 
A formai definition of thè PRINT 
routine will help explain its use in 
your SPEED/ASM programs. 

The PRINT routine is used to print 
a sequence of ASCII characters to thè 
Apple’s video screen. This routine 
prints every character following thè 
JSR PRINT instruction up to, but not 
including, a zero terminating byte. 
Upon encountering a zero byte, thè 
PRINT routine terminates output, 
and control is returned to thè 6502 in¬ 
struction that follows thè zero byte. 

PRINT is useful for printing mes- 
sages, prompts and other string liter- 
al output. PRINT does not automati¬ 
cally eject a carriage retum after 
thè string is printed. If you wish to 
output a carriage return you must ex- 
plicitly include thè ASCII code for 
thè carriage retum in your output 
string; i.e., 

JSR PRINT 

BYT “STRING fòllowed by Return” ,CR,0 
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Instant Posting-Immediate Reporting 

POWER to make last, efficient management decisione. POWER to 
adjust to fluctuations in sales. POWER to increase productivity and 
profits. 

B.l.S is more than just a generai ledger .. it's business information 
system that can produce selected business actlvity reports 
immediately. 

B.l.S IS FAST 

• Machine language saves time . accepts 3000 entries a day 
as tast as you can type. Every entry is saved for selective 
analysis. 

Instantaneous posting - 40 split entries can be 
completely posted in less than 20 seconds. 

• Immediate reporting - within tour minutes of any 
entry, a complete BALANCE SHEET, P&L, or OETAILEO 
SELECTIVE ANALYSIS REPORT reflectlng that entry 
can be printed and reviewed. 

B.l.S IS FLEXIBLE 
• Define your own Journal Names, 
Account Prompts, Activity Codes, 
Custom Report Generators, Account 
Ranges and Descriptions. 

• A single B.l.S General Ledger 
handles THREE completely separate 
sets of books with consolidating 
capabilities. 

B.l.S IS EASY TO USE 
• Menus are simple. 

Accounts and Journals are 
al ready set up. 

• Hand-holding Tutorial 
Manual outlines every 
key stroke. 

Put thè power of 
B.l.S to work for you. 


B.l.S is avaiiabie from your locai Apple 
dealer for $299. 

If he’s out of stock, have him give us a 
cali at (214) 341-1635 or write: 

John Broderie)* *,CPA 
Broderie)* & Associates 

8635 Shagrock 
Dallas. Texas 75238 



Downloadedfrom wwwApple2Onhne.c0m 
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Listing continued. 


08C2 

177 

f 


086B 22 0B 

143 

ADR RANDQM2 

08C2 20 36 78 

178 


JSR PRINT 

086D 20 54 78 

144 

JSR ffiS 

08C5 8D D4 E8 

179 


BYT CR,"The sum is ",0 

0870 22 OB 

145 

ADR RAND0M2 

08C8 ES A0 F3 




0872 70 1B 

146 

BVS OVEStFLOW 

08CB F5 H3 Afl 




0874 20 5/ 78 

147 

JSR NEG 

08CE E9 F3 A0 




0877 22 0B 

148 

ADR RAND0M2 

08D1 00 




0879 70 14 

149 

BVS OVERFLCW 

08D2 20 3C 78 

18U 


jsr stanar 

087B 

150 


08D5 16 OB 

181 


ADR SUM 

087B 20 63 78 

151 

JSR ft© 

08D7 

182 

I 


087E 24 OB 

152 

ADR RAND0M3 

08D7 

183 

e 

Print thè difference: 

0880 20 57 78 

153 

JSR NEG 

08D7 

184 

f 


0883 24 0B 

154 

ADR RANDQM3 

08D7 20 36 78 

185 


JSR PRINT 

0885 70 08 

155 

BVS OVEKFDOW 

08DA 8D D4 E8 

186 


BYT Ot,The difference (I-J) is ",0 

0887 

156 


08ED E5 A0 E4 




0887 20 63 78 

157 


O8E0 E9 ES E6 




088A 26 0B 

158 

ADR RAMXJM4 

08E3 ES F2 E5 




088C 4C A9 08 

159 

JMP PK0WMS 

08EE EE K3 ES 




088F 

160 

• 

08E9 AD AB C9 




088F 20 36 78 

161 

OVEKFLCW JSR FRINT 

08EC AD CA A9 




0892 8D 8D CF 

162 

BYT CR,CR, "Overf lOW occured*,CR,0 

08EF A0 E9 F3 




0895 F6 IS F2 



08F2 A0 00 




0898 E6 EE EF 



08F4 20 3C 78 

187 


JSR PKFINT 

089B F7 A0 EF 



08F7 1C 0B 

188 


ADR DIFIRNCE 

089E E3 E3 F5 



08F9 

189 

f 


OSAI F2 ES E4 



08F9 

190 

f 

Print thè product: 

08A4 8D 00 



08F9 

191 

r 


08S6 4C 69 FF 

163 

JMP EXIT 

08F9 20 36 78 

192 


JSR IRENT 

08A9 

164 


08PC 8D D4 E8 

193 


BYT OR,"The product is ",0 

08A9 

165 


08FF E5 AD F0 




08A9 

166 


09u2 F2 EF E4 




08A9 

167 

; Print thè sum: 

0905 F5 E3 F4 




08A9 

168 


0908 AD E9 F3 




08A9 20 36 78 

169 

TRTNCJMS JSR PRINT 

09UB AD 00 




08AC C9 BD AD 

170 

BYT "1= ",0 

090D 20 3C 78 

194 


JSR HtTXNT 

08AF 00 



09l0 18 0B 

195 


ADR PRCDUCT 

08B0 20 3C 78 

171 

JSR PRTIOT 

0912 

196 



08B3 12 OB 

172 

ADR I 

0912 

197 


Print thè quotient 

08B5 20 36 78 

173 

JSR TRINI 

09i2 

198 



08B8 8D CA BD 

174 

BYT CR,"J- ",0 

0912 20 36 78 

199 


JSR PRINT 

08BB AD 00 



0915 8D D4 E8 

200 


BYT CR,“The quotient <J/I) is ",0 

08BD 20 3C 78 

175 

JSR EKTINT 





OSCO 14 OB 

176 

ADR J 




Listitig continued. 
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Business Software: ACCOUNTING PLUS -from $329 

... DESIGNEDFOR YOUR APPLE'OR IBM PC.' 


Accounring Plus II™ is recognizcd for completeness and effidency. Speed, zoo, because it 
uses 6502 machine language. Just push a button and start. Comes with its own firmware 
cara, no extra hardware to buy — unlike many systems which require 
additional memory and other expensive cards. Upgradable, it grows with 
your needs - supports 2 or 3 floppy drives or a hard disk. It Works with 
virtually ali printers. And it’s also fully integrated, so all your entries 
automaticalfy update all other applicable areas. 

■ Accounting Plus™has all thè outstanding capabilities of our “li ” 
version but is a ( P/M software package. It operates on many CP/M 
compatible machines. 

‘| * Apple, IBM Accounting Bus II. Accounting Hus and CP/M ... . . *—■f 

are either tradenarks or regutered tracie maria of Apple ■—» SIS 

Computer, Ine., International Business Machines Corp., «■———■—■ i n S ZZLSIS 

Software Dimensioni, Ine. and Digital Research, Ine., SSSSSmm SSSm ~ HES 

respectiuety. _ 

^ Software Management Group 

SOFTWARE .SUPPOKT * SERVICE 

12555 Biscayne Boulevard, 

Suite 805, Miami, Florida 33181 

•V IKjjEltJt )I.I,-FREE: (800) 327-7701/In Fla.; (305) 757-5416 


alitne benetits 


A/CCOUNTING PLUS (IBM PC-CP/M Version) 

( ) General Ledeer ( ) Pavroll 

( ) A/R(65,000aMorners) ( ) A/P(65,000vendors) 

( )PointofSale ( (Inventory 

( ) Purch. Order Entry ( ) Sales Orda Entry 

‘Designed far; Altos 5*4, Vector Graphics 5*4, Televideo, 8” SS SD, 

Apple 111, Otrona, Northstar Advantage, IBM PC. 

Price per quandty: $369/1, $729/2, $1069/3, $1399/4 
$1719/5, $2039/6, $2349/7, $2449/8. 


( ) Payroll lfl|329 ( )C 
( (General Ledger^A|29 ( )C 
( )G'L, A/R ^«0*. 

Order by check, Msa orM^jjrfard. I 
add 5% sales tax. Immediate deli' 


Inventory 


srfofy $629 ^4'7G/L, A/R, Inventory $829 
/VR §&& ( )G/L,A/R, A/P, Inventory $995 

JKtSmpping/handling; Ha residents 
day money-back guarantee. —.. . 


Visa or MasterCard #_ 
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THE HUNTINGTON GANG won t hold you up with high prices. We try to offer you thè largest selection in thè 
country at discount prices. Left to right, back row: Danny Huntington, Angela Huntington, Fred Huntington; front 
row: Barb Huntington (holding Dale Huntington) and Melody Huntington. 

SOFTLIGHTS 

By Fred Huntington 


IfiThere are so many new products to teli about that its hard to know 

B where to begin. Just remember, if its available for Apple or Atari, 
chances are we elther have it in stock or can get It for you. 

B newataristuff 

Play Bingo on thè Atari for only $9.94 cassette (#1580) or disk for 

B $ 12.94 (# 1581 ). The new In-Home keyboard (#1215) for thè Atari 400 
is a class piece of hardware on sale for $ 99 . 44 . 

B Synapse stili is our top-selling company for Atari software. Slime, Claim 
Jumper. Picnic Paranoia, and Raptilian are |ust a few of those available 
_ for $39.64 on either cassette or disk. 
fà I CLASS ACT: PENGUIN SOFTWARE 

B ™ We always thought that Penguin Software was among thè top avail¬ 
able. Their graphics software is absolutely tops. If you read my article in 

B the March incider, you know what I think of high prices of software. 
Well. my friends at Penguin have done something about those high 
prices. They havedropped thè prices of all their games to $19.95. 

B ln addition they ve taken some already good games and improved upon 
them. More for lessi To celebrate, we re offermg thè following specials: 

B * 1 756 Transyslvama. #1761 Spy s Demise, and # 1 760 Pie Man all for 
$ 14.99 each 1 All are excellent games. 
m A LEGEND IN THEIR OWN TIME 


Il - We have special sale prices on their 64K and 128K boards. I have a 
128K board in my personal computer and think it s great. 

Apple Flasher is a nifty little program that allows you to present an Apple 

We have more educational software than anybody in thè country that sa 
we know of. Schools: we will take your purchase orders if prepaid, COD, M 
or if you agree to pay thè full list price. SI 

Take a look at thè Special Learning Ed Software by Sled for spelling WÀ 
(fourdisks). List price S230. — on sale for $179. ^ 

Our best special of thè month: Terrapin (#9140) LOGO on sale for $99. M 
All PAL software available. 

Here s a super program from Avon/Camelot: A Kid s Guide to BASIC M 
Programming BASIC FUN — only $2.25. A great book. A 

Then there s Micro Mother Goose for 3-9 year olds ( not copy protected ) ^1 
for $33.89. m 

Fmally check out thè Apple II - Reference guide by Nano for $4.49. It s Wi 
a card that has most of thè things you II ever need to know about your 
Apple — for beginnmg and advanced programmers. 

All thp tnn 30 alu/auic availahlo 


HUNTINGTON COMPUTING 

Post Office Box 1297 j 

Corcoran. California 93212 


B Foreign Orders 209-992-4481 
In California 800-692-4146 


i We take MasterCard, American Express or VISA (Include caro # and 

Appiè - is a reg.sterea irademark of Appiè Compuier. ine expiration date). California residentsadd 6° otax Include S2 00 for postage 
'^ are9 ' ste ' ea,radernarl<0,Commo<:,0,e Foreign and hardware extra Foreign lexcludinq Canadai remit U S cur- 

Aian ,S a VgSct'adSSh? C ° ,P . rency ' ch ?= ks ^ S banks u ? e ll s,ed dhar 9 e cards. or make direct w,re 

transfers through Secunty Pacific Bank Corcoran. for a S6 00 charge All 
Outside Calif. 800-344-5106 overseas orders shipped by air Send for free catalog Prices subject to 

change without notice 
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Listing continued. 


0918 E5 AD FI 
091B F5 EF F4 
09J.E E9 ES EE 
0921 F4 AO A8 
0924 CA AF C9 
0927 A9 AO E9 
092A 00 


092D 20 3C 78 

201 

JSR PRTINT 

0930 1A 0B 

202 

ADR QUOTIEKT 

0932 

203 

# 

0932 

204 

; Print thè renai rider : 

0932 

205 

7 

0932 20 36 78 

206 

JSR FRINÌ 

0935 8D D4 E8 

207 

BYT CR,"The remainder 


0938 E5 AO F2 
093B E5 EE E1 


093E E9 EE E4 
0941 E5 F2 AO 
0944 AB CA AO 
0947 ED ÉF E4 
094A AO C9 A9 
094D A0 E9 F3 
0950 AO 00 



0952 20 3C 78 

208 

JSR PRTINT 

0955 1E 0B 

209 

ADR REMANDR 

0957 

210 

1 

0957 

211 

t Print thè tandem numbers: 

0957 

212 

f 

0957 20 36 78 

213 

JSR PRINT 

095A 8D D4 E8 

214 

BIT CR,"The tandem numbers are: 

095D E5 A0 F2 
0960 E1 EE E4 
0963 EF ED A0 
0966 EE F5 ED 
0969 E2 E5 F2 
096C F3 AO E1 
096F F2 E5 BA 
0972 8D D2 E1 

215 

BYT CR,"Randoml: ",0 

0975 EE E4 EF 
0978 ED B1 BA 
097B A0 00 

097D 20 3C 78 

216 

JSR PRTINT 

0980 20 0B 

217 

ADR RANDOML 

0982 20 36 78 

218 

JSR PRINT 

0985 8D D2 E1 

219 

BYT CR,"Randcm2i *,0 

0988 EE E4 EF 
098B ED B2 BA 
098E A0 00 

0990 20 3C 78 

220 

JSR IRTINT 

0993 22 0B 

221 

ADR RAND0M2 

0995 20 36 78 

222 

JSR HUNT 

0998 8D D2 E1 

223 

BYT CR,"Randan3: ",0 

099B EE E4 EF 
099E ED B3 BA 
09Al AO 00 

09A3 20 3C 78 

224 

jsr irtint 

09A6 24 0B 

225 

AI» RAHXK3 

09A8 20 36 78 

226 

JSR PRINT 

09AB 8D D2 E1 

227 

BYT CR,"Randan4: ",0 

09AE EE E4 EF 
09B1 ED B4 BA 
09B4 AO 00 

09B6 20 3C 78 

228 

JSR IRTINT 

09B9 26 0B 

229 

ADR RANDOM4 

09BB 

230 

? 

09BB 

231 


09BB 

232 

; Demonstrate thè MOVE subroutine 

09BB 

233 

? 

09BB 20 36 78 

234 

JSR PRINT 

09BE 8D 8D C3 

235 

BYT CR,CR r "Current contents of 

09C1 F5 F2 F2 
09C4 E5 EE F4 
09C7 AD Q EF 
09CA EE F4 E5 



*,Ò 


09Q) EE F4 F3 
09DO A0 EF E6 
09D3 A0 C9 AO 
09D6 E9 F3 A0 



09D9 00 



09DA 20 3C 78 

236 

JSR PRTINT 

091» 12 0B 

237 

ADR I 

09DF 20 36 78 

238 

JSR ERINT 

09E2 8D C3 F5 
09ES F2 F2 E5 
09E8 EE F4 AO 
09EB E3 EF EE 
09EE F4 E5 EE 
09F1 F4 F3 A0 
09F4 EF E6 A0 
09F7 CA A0 E9 
09FA F3 AO 00 

239 

BYT CR,"Current contents of J is ",0 

09ED 20 3C 78 

240 

JSR PRTINT 


Listing continued. 


The Assembly Advantage— 


Note that CR was used instead of 
thè actual code for carriage return 
($8D). GR is a symbol, defined in 
thè SPEÈD/ASM equates, which is re- 
placed by thè value $8D. 

Since PRINT will print all charac- 
ters up to thè terminating zero byte, 
multiple lines can be output using a 
single cali to thè PRINT subroutine. 
Simply separate each line with a car¬ 
riage return and PRINT will output 
thè text on severa! lines: 

JSR PRINT 

BYT “This is thè first line, 

and it is follwed by”,CR 
BYT “this second line.”,CR,0 
Other than improving thè readability 
of thè program, thè separate lines 
rieed not appear on separate source 
lines as in this example. The second 
string could have immediately fol- 
lowed thè CR on thè first line. This 
type of coding, however, is not recom- 
mended because it makes thè source 
file much harder to read. 

Performing Integer I/O 
In SPEED/ASM 

Operating on integer values is one 
of thè primary functions you will do in 
SPEED/ASM. However, these opera- 
tions are almost useless unless you can 
communicate thè results of these 
operations to thè world outside thè 
computer. Two routines are provided 
in thè SPEED/ASM package to facili¬ 
tate integer I/O: RDINT (read an in¬ 
teger) and PRTINT (print an integer). 

Printing an integer using thè 
PRTINT routine is easy—just follow 
thè JSR PRTINT with thè address of 
thè integer you want to print. For ex¬ 
ample, if you wanted to print thè con¬ 
tents of thè integer variatile I onto thè 
Apple’s video screen you would use 
thè statement(s): 

JSR PRTINT 
ADR I 

and thè contents of I would be 
displayed for you. In thè next in- 
stallation of this series I will discuss 
how to format this output to create a 
pretty listing. 

The RDINT routine is a little more 
complicated to use thàn thè PRTINT 
routine because there is thè possibili- 
ty that an errar condition might oc- 
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Listing continued. 

OMO 14 OB ; 
0M2 ; 

0M2 20 2A 78 ; 

0A05 12 OB 14 ; 

0A08 OB 

0A09 ; 

OA09 20 36 78 ; 

OAOC 8D CE EF ; 

OAOF F7 AO C9 

0A12 AO £3 EF 

0A15 EE F4 £1 

0A18 E9 EE F3 

0A1B AO 00 

0A1D 20 3C 78 

0A20 12 OB 

0A22 20 36 78 

0A25 8D E1 EE 

0A28 E4 AO CA 

0A2B AO E3 EF 

0A2E EE F4 E1 

0A31 E9 EE F3 

0A34 AO 00 

0A36 20 3C 78 

0A39 14 OB 

0A3B 
0A3B 
0A3B 
0A3B 
0A3B 
0A3B 

0A3B 20 36 78 2 

0A3E 8D 8D C4 2 

0A41 EF AO F9 

0A44 EF F5 AO 

0A47 F7 E9 F3 

0A4A E8 AO F4 

0A4D EF AO F2 

0A50 E5 AD F2 

0A53 F5 EE AO 

0A56 F4 E8 E9 

0A59 F3 8D 

0A5B FO F2 EF 2 

0A5E E7 F2 E1 

0A61 ED AO A8 

0A64 D9 AF CE 

0A67 A9 BF AO 

0A6A 00 

0A6B 20 03 7 8 2 

0A6E 29 DF 2 

0A70 20 00 78 2 

0A73 C9 CE 2 

0A75 DO 03 2 

0A77 4C 69 FF 2 

0A7A 2 

0A7A C9 D9 2 

0A7C DO BD 2 

0A7E 2 

0A7E 2 

0A7E 2 

0A7E 2 

0A7E 2 

0A7E 20 36 78 2 

OASI 8D 2 

0A82 C5 EE F4 2 

0A85 E5 F2 AO 

0A88 E1 AO EE 

0A8B ES F7 AO 

0A8E F6 E1 EC 

0A91 F5 E5 AO 

0A94 B6 EF F2 

0A97 AO C9 ESA 

0A9A 00 

0A9B 20 OF 78 2 

0A9E 20 42 7 8 2 

0AA1 12 OB 2 

0AA3 50 21 2 

0AA5 20 36 78 2 

0AA8 8D C5 F2 2 

OAAB F2 EF F2 

OAAE AO E9 EE 

0AB1 AO E5 EE 

0AB4 F4 F2 F9 

0AB7 AC AO F2 

OABA E5 AD E5 

OABD EE F4 E5 

OACO F2 8D 00 

0AC3 4C 7E OA 2 

0AC6 2 

0AC6 20 36 78 2 

0AC9 8D C5 EE 2 

OACC F4 E5 F2 

OACF AO E1 AO 


252 

253 

254 ; 

255 ; 

256 ; Ask 

257 ; thè 

258 ; 

259 ; 

260 RERUN 


JSR MOVE 
ADR I,J 


JSR PRIOT 

BYT CR,"Ncw I contains ",0 


JSR JKTINT 
ADR I 
JSR IRINT 

BYT CR,"and J contains ",0 


JSR PRTINT 
ADR J 


Ask thè user if he wants to re-run 
thè progran with user input. 


JSR IRINT 

BYT CR,CR,"Do you wish to re-run this",CR 


BYT "progran (Y/N)? ",0 


;Convert Lower 


JSR Ge’ìC 
AND #SDF 
JSR HJTC 
CMP #"N" 
BNE >1 
JMP EXIT 

dtp #"y" 

BNE RERDN 


If so, get new values for I and J 


BADNUM1 JSR ERINT 
BYT CR 

BYT "Enter a new value for I:",0 


to Upper case 


JSR READLN 
JSR RDINT 
ADR I 

BVC GOODNUML 
JSR PRINT 

BYT CR,"Error in entry, re-enter",CR,0 


286 JMP BADNUM1 

287 ; 

288 GOCDNUM1 JSR PRINT 

289 BYT CR,"Enter a new value for J:",0 


Listing continued. 


fbee 


FREE! For beginners AND prosi An exclusive 
collection of useful Apple info and program- 
ming hints printed on one big poster— A 
unique reference and valuable Apple teaching 
tool that you won’t want to be without! 

FastLouie offers this attractive poster 
FREE to software purchasers. If it's for thè 
Apple, there's an excellent chance that FAST 
LOUIE has it! He re are just a few examples 
from our giant Discount Software Warehouse. 

(WRITE for FREE complete Catalog.) 


■ New! Louie (Retali) 

□ ALPHA PLOT.33.50 (39.95) 

□ APPLE MECHANIC.25.00 (29.95) 

□ ARCADE MACHINE.50.95 (59.95) 

□ BAG OF TRICKS.33.50 (39.50) 

□ BUDGE 3-D GRAPHICS . . 33.50 (39.95) 

□ CHOPLIFTER.29.95 (34.95) 

■ DOUBLE-TAKE.29.95 (34.95) 

■ FLEX TEXT.25.00 ( 29 . 95 ) 

□ FLIGHT SIMULATOR.28.50 (33.50) 

□ FROGGER.29.95 (34.95) 

□ G.P.L.E.55.00 (65.oo) 

□ GRAPHICS MAGICIAN ... 50.95 159 . 96 ) 

□ HOME ACCOUNTANT .... 63.50 (74.95) 

□ JOYSTICK (T.G.).50.95 ( 59 . 95 ) 

□ KNOW-YOUR-APPLE.29.95 134 . 95 ) 

□ MASTER TYPE .33.50 (39.95) 

■ MINER 2049er.33.50 ( 39 . 95 ) 

□ MONEY-DECISN. l-or-2 .165.00d99.oo) 

■ PINBALL CONST. SET ... 33.50 ( 39 . 95 ) 

■ PRONTO-DOS.25.00 ( 29 . 95 ) 

□ SPECIAL EFFECTS.33.50 (39.95) 

□ TIP DISK # 1 . 17.50 (20.00) 

■ TYPEFACES.17.50 ( 20 . 00 ) 

□ UTILITY CITY.24.50 ( 29 . 95 ) 

□ WABASH DISKS (IO).25.00 (29.95) 

□ ZOOM GRAFIX.33.50 ( 39 . 95 ) 


Fast Louie tops thè discount competition with 
IMMEDIATE SHIPPING plus Big Bonuses like 
our brand new APPLE TIP CHART. Phone us 
now, TOLL FREE, with your Visa or Master¬ 
Card nos., OR mail U.S.check or money order. 

SPECIAL DISCOUNTS! 

Order any three items from Fast Louie 
and DEDUCT 15% from ANY 4th-ITEM. 
FREE SHIPPING on orders over J85.00. 

Card-Purchases and Personal Checks 
CLEARED SAME-DAY for IMMEDIATE 
PROCESSING of your Software Orders 1 

(School P.O.’s Processeci (mmedlately Too!) 


Software Orders Only, 24-hours-a-day— 

Phone TOLL FREE 
1-800-428-7825 ext.99 

(California: 1-800-428-7824 ext.99) 

Or mail U.S.Check or Money Order to: 

FAST LOUIE’S 

DISCOUNT APPLE SOFTWARE 
Post Office Box 1495 
Auburn. California 95603 

Orders under 85.00 must add 2.50 shipping. 
California add 6% / Foreign 4.50 / COD 3.00 
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The Assembly Advantage- 


Listing continued. 


0AD2 EE E5 F7 
0/05 AO F6 El 
0AD8 EC F5 E5 
OADB M Et: EF 
OADE F2 SO CA 
0AE1 BA 00 
0AE3 20 OF 78 
0AE6 20 42 78 
0AE9 14 OB 
OHE 50 22 
OAED 20 36 78 
OAFO 8D C2 El 
0AF3 E4 AO F6 
0AP6 EL BC F5 
0AF9 E5 AO E6 
OAFC EF F2 AO 
OAFF CA AC AO 
0B02 F2 E5 AD 
0B05 15 EE F4 
OB08 E5 F2 8D 
OBOB 00 
OBOC 4C 06 OA 
OBOF 

OBOF 4C 11 08 

0B12 

0512 

0512 

0512 

0512 

0512 

0612 

0512 

0512 

0512 

0512 

0512 

0BL2 

0512 

0512 

0512 

0512 

0512 

0512 00 00 
0514 00 00 
0516 

0516 00 00 
0518 00 00 
0B1A 00 00 
0B1C 00 00 
0B1E 00 00 
0520 00 00 
0622 00 00 
0624 00 00 
0526 00 00 
0528 
0628 


290 

JSR READUM 

291 

JSR RDINT 

292 

ADR J 

293 

BVC >0 

294 

JSR PRBfT 

295 

EHT CR, "Bad value for J, 


2 % 


JMP GO0CNUK1 

297 

; 


298 

"0 

JMP LOOP 

299 

i 


300 

} 


301 

; 


302 

; 


303 



304 

t 


305 

} 


306 

i 



307 ********************************** 

308 ; 

309 ; Variable declarations: 

310 > 

311 ; The follcwing variables are all 

312 > integers. So they are declared 

313 ; with thè ADR peeudo opcode to 

314 » reserve tara bytes for cacti integer. 

315 t 

316 ; 

317 I ADR 0 

318 J ADR 0 

319 > 

320 SUB ADR 0 

321 PRODUCI ADR 0 

322 QUOTIENT ADR 0 

323 DIFFSMCE ADR 0 

324 REMMCR ADR 0 

325 RAMXM ADR 0 

326 RAN30M2 ADR 0 

327 RAM30K3 ADR 0 

328 RANDOM4 ADR 0 

329 ; 

330 END 


***** END OF ASSQBLY 


Ibrun sort 


BFUN BORI 

SYMBOL TABLE SORTED AIIHABETTCALLY 


ABS 

7854 

BAENUKL 

0A7E 

CASE 

7848 

CASEI 

784B 

CR 

008D 

DXFFRNCE 

05LC 

DIV 

785D 

EXIT 

FF69 

FALSE 

0000 

FOR 

7815 

FORO 

7818 

GETC 

7803 

G0CCHUM1 0AC6 

BONE 

780C 

I 

0612 

IFI 

781E 

IFI0 

7821 

IFS 

7824 

IFS0 

7827 

INIT 

7812 

INSET 

784E 

J 

0514 

1D3TR 

7833 

LQAD 

782D 

LOOP 

0811 

HDD 

7860 

MOVE 

782A 

M3VS 

7830 

MUL 

785A 

NEG 

7857 

NEJCT 

781B 

NOTINSET 7851 

OJXGOTO 

7845 

CWEKFLOW 086F 

PRINT 

7836 

PRCDUCT 

0518 

ERTINT 

783C 

PRTOOMS 

08A9 

FKTSTR 

7839 

HJTC 

7800 

QUOTIENT 0B1A 

RAND0M1 

0B20 

RAMX3M2 

0522 

RANDOM3 

0B24 

RAID0M4 

0526 

RDINT 

7842 

RDSTR 

783F 

REAIO 

780F 

REMANDR 

0B1E 

RERUN 

0A35 

FND 

7863 

StGL 

7806 

SAPC 

7809 

START 

0800 

SOM 

0516 

THIE 

0001 









SYMBOL TABLE SORTED BY ADDRESS 







FALSE 

0000 

TRDE 

0001 

CR 

008D 

START 

0800 

LOOP 

0811 

OVHÌFLCW 088F 

PKTWMS 

08A9 

RERUN 

0A3B 

BADNUM1 

0A7E 

GOCDNDMI 

0AC6 

I 

0512 

J 

0514 

SO» 

0516 

PRCDUCT 

0B18 

QUOTIENT 0B1A 

DIFETOJCE 0R1C 

REMANDR 

0B1E 

RANDOKL 

0520 

RAMX3M2 

0522 

RANDOM3 

0524 

RAMX3H4 

0526 

FOTO 

7800 

GETC 

7803 

SPGL 

7806 

SAPC 

7809 

HOME 

780C 

REAIXN 

780F 

IN3T 

7812 

FOR 

7815 

FC®0 

7818 

NEXT 

781B 

in 

781E 

ino 

7821 

IFS 

7824 

IFS0 

7827 

MOVE 

762A 

LQAD 

782D 

M0VS 

7830 

IDSTR 

7833 

FRINT 

7836 

PRTffm 

7839 

IKTINT 

783C 

RDSTO 

783F 

RDINT 

7842 

CNXGOIO 

7845 

CASE 

7848 

CASEI 

784B 

INSET 

784E 

N0TINSET 

7851 

ABS 

7854 

NEG 

7857 

MUL 

785A 

DIV 

785D 

M0D 

7860 

FND 

7863 

EXIT 

FF69 










Lifting continued. 


cur. The RDINT routine expects thè 
user to type a valici numeric integer 
which takes thè form: 

1) Any number of leading blanks, 
commas or carriage returns, 
followed by 

2) An optional minus sign, 
followed by 

3) One to five digits forming a 
value in thè range 0. . . 32767, 
followed by 

4) A space, comma or carriage 
return. 

If thè numeric string is of thè prop- 
er format then SPEED/ASM will 
store thè value into thè integer 
variable whose address follows thè 
JSR; e.g., 

JSR RDINT 
ADR J 

will read an integer variable from thè 
line input buffer (reading a new line 
if necessary) and store thè numeric 
value into J. 

If an input error occurs, then thè V 
flag will be returned set so you can 
use thè BVS or BVC instruction to 
test for thè error condition. Three er¬ 
ror conditions can be returned in thè 
6502 accumulator. If thè overflow 
flag is set, then thè accumulator con- 
tains zero if thè last character of thè 
number wasn’t a space, comma or 
carriage return. This error condition 
can be considered optional. If you 
want to allow characters other than 
space, comma and carriage return at 
thè end of a number, you can ignore 
this error. 

If thè overflow flag is set and thè 
accumulator contains one, thè first 
character of thè number was not a 
valid digit or minus sign. All preced- 
ing spaces, commas and carriage re¬ 
turns were stripped before thè failure 
to obtain a digit or minus sign was 
detected. This is a definite error and 
your program should prompt thè user 
to re-enter thè data. 

If thè overflow flag was set and thè 
accumulator contained $8D, thè val¬ 
ue entered by thè user was greater 
than 32767 or less than -32768. 
Obviously this number must be re- 
entered by thè user. A program that 
would prompt thè user to re-enter 
on an entry error is shown in Exam- 
ple 10. 
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PUTPRICES IN CHECK 


CARTRIDGE RIBBONS FOR 

APPLE PRINTERS 

NEC 8023A 

C. ITOH PROWRITER 

$ Q 95 $1f)7 46 

J■ EA. 1 VI ■ DOZ. 

CARTRIDGE RIBBONS FOR 

EPSON 
MX-80 MX-100 

S 6. OT EA S 11 ."E* 

s 86. 29 ea s 129. 06 ooz 

MAXELL 

DISKETTES 

5 Va ” SINGLE SIDE 

DUAL DENSITY 

MD-1 

SOQ 90 

m io pack 

INNOVATIVE 

CONCEPTS 

FLIP‘N’FILE 

DISC STORAGE BOX 

HOLDS UP TO 60 DISKETTES 

5Vi " 8" 

$OA 95 SOQ 95 

^ ■ EA fc\/l EA 

RIBBONS FOR 

IDS PRINTERS 

EA DOZ 

440 s 2. 77 s 29. 92 

PAPER TIGER S 6. 95 S 75. 06 
MICROPRISM S 7. 99 $ 86. 29 
PRISM 10. 95 118. 25 

DISKETTE 

STORAGE 

BOXES 

5'A" — BLUE OR BEIGE 

$0 49 

émm ■ ea. 

DUAL SPOOL RIBBONS FOR 

OKIDATA 

PRINTERS 

80, 82, 83 EA D0Z 

92,93 s 2. 77 s 29. 92 

84 s 5. 99 s 64. 69 

MEMOREX 

DISKETTES 

5’4 SINGLE SIDE - DUAL DENSITY 

$0 A 99 

■ io PACK 

COLOR- 

CODER 

LIBRARY CASE SET 

C 'NT a ims RRiGHT COLORS 

SVd" 8” 

s 19. 95 s 23. 95 

SET OF 5 SET OF -S 

ANTI-STATIC 

SPRAY 

FULL QUART SIZE 

WITH DISPENSER 

*6. 95 ., 

1GALLON REFILL $ 19. 95 

CARTRIDGE RIBBONS FOR 

COMREX 

DAISYWRITER 2000 

SO 49 $9fi 89 

EA £m\J m DOZ 

LABEL 

SPECIAL 

$0 99 

Li /k 

(5K MIN) 

1 ACROSS 3 x 15/16 CONTINUOUS LABELS 



TOLL FREE 800-343-7706 
IN MASS 617-963-7694 

PHONES OPEN 9AM-7PM EASTERN TIME 


MOST RIBBONS AVAILABLE IN COLORS TOO! 

CALL OR WRITE FOR OUR SUPPLIES CATALOGUE 
ON ORDERS UNDER ‘14 ” PLEASE ADD 5 3.°° FOR SHIPPING 
MINIMUM RIBBON ORDER s 30.°° OR 1 DOZEN 

- Check-Mate— 


88 


51 DIAUTO DR. P O BOX 103 

RANDOLPH. MA 02368 


MASS RESIDENTS 
ADD 5% SALES TAX 


Clrcle 40 on Reader Service card. 
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Listing continued. 

DOES YOUR APPLE SUPFOKT LOWER CASE 

Ehter a new vaxue for 1:25 

Ehter a new vaxue for 1:59 

DISHAY? (Y/N) : 

Ehter a new vaine for J:36 

Ehter a new vaiue for J:22 

1 = 10 

1= 25 

I» 59 

J- 54 

J= 36 

22 

The suro ìs 64 

The suiti is 61 

The sum is 81 

Die difference (I—J) is -44 

The difference (I-J) is -11 

The difference (I-J) is 37 

The proauct is 540 

The product is 900 

The product is 1298 

The quotient (J/I) is 5 

The quotient (J/I) is 1 

The quotient (J/I) is 0 

The remainder (J mod 1) is 4 

The remainder (J mod lì is 11 

The remainder (J mod I) is 22 

The randan numbers are: 

The randem numbers are: 

The randa» numbers'are: 

Randanl: 11979 

Randcml: 30641 

Randcml: 26303 

Randcro2: -28681 

Randcm2: -6027 

Randcm2: -20411 

Randan3 : 3539 

RandcnG: 25673 

Randcm3: -5287 

Kandcnrf: 31519 

Randcm4: 14189 

Randcm4: -1347 

Current contente of I is 10 

Current contente of I is 25 

Current contents of I is 59 

Current contents cf J is 54 

Current contents of J is 36 

Current contents of J is 22 

New 1 contains 10 

Now I contains 25 

Now I contains 59 

and J contains 10 

and J contains 25 

ano J contains 59 

Do you wish to re-run this 

Do you wish to re-run this 

Do you wish to re-run this 

program (Y/N)? Y 

program (Y/N)7 Y 

program (Y/N) 7 N 


I have included additional ex- routines presented thus far haven’t 
amples in Listing 2. included thè necessary looping, 

conditional, and transfer of control 
Looking Forward routines. Next time I’il start discuss- 

So far thè examples have been ing program control structures so 
rather trivial since thè SPEED/ASM that you will be able to start writing 
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fairly complex programs. See ya next 
timel ■ 

Note: SPEED/ASM and LISA v2.5 
are available from Sierra On-Line, 
209-683-6858. These programs are 
aho available at your locai dealer. 
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Now ever) hunt-and-peck typists produce perfectly formatted letters... 
memos... presentations... Scripts... automatically. 


NOW ...A COMPLETE SELECTION OF 
HIGH-PERFORMANCE FEATURES IN 
TODAY'S MOST ADVANCED WORD 
PROCESSING TOOL. 

The professionals who use PowerText 
teli us it's changed their whde concept of 
word processing. 

Because this is thè System that goes far 
beyond thè write/edit/print/file capabilities 
of other word processore. 

PowerText produces documents that 
look exaetly as you want them to look... 
automatically. Fioro everyday business 
lettere to thè most complicated presenta¬ 
tions and reports you can devise. 

You define thè basic formats. PowerText 
Stores them in its style files. 

So when you write, you just bat out thè 
words and never worry about wheie they 
go on thè printed page. 

That’s PowerText’s job. 

You just teli PowerText, "I want a letter," 
and you get a letter.. .and envelope. With 
every element just where you want it to be. 

Ask for a memo and you get a memo. 
Ask for a dramatic script and you get a 
dramatic script... 

OK, that’s one big PowerText plus : thè 
automatic formatting capability that can 
save you untold time and effort. 

But there’s stili more. A full selection of 
high-performance features to make your 
word processing faster, easier, more auto¬ 
matic than any System you’ve ever seen... 
Total control editing. 

Automatic indents and numbers for out- 
lines, with system-assigned Roman and 
Arabie numerate, and alphanumerics. 

A disk-based editor: file sizes limited 
only by disk space. 

The system automatically maintains a 
backup copy of thè file being edited. I 1 
User-definable function keys. 1 

Up to 7 levels of "nested" editing to let 1 
you suspend editing one file and move to ! 
another. 

“Paint mode” editing allows vertical typ- 
ing for diagrams. 

ALL THIS IS AUTOMATIC IN EVERY KIND 
OF DOCUMENT YOU WRITE. 

• Margins • Variable pitch 

• Indents • Pagination 

• Spacing • Table of contents 

• Title page • Headers and footers 

• Envelope, label • Footnote Numbers 

• Justification • Intelligent page 

• Centering breaks 


PLUS MANY OTHER VALUABLE 
FEATURES. 

• Built-in form letter • No limit to docu- 

capability ment length 

• Boxed copy • 132-character 

• Print macros lines 

• Up to 14 columns • Superscripts, 

• Boilerplate subscripts 

inclusion • Column and 

• Optional word- line adjustment 

by-word cursor capabilities 

move • And much more. 

• Vert. and horiz. 
border lines 

NEW IO-LESSON TUTORIAL. 

Our new, streamlined 10-lesson tutorial 
makes learning PowerText a snap. You’ll 
master it quickly, as you discover how 
easy and straightforward it is to use. And 
your system also includes a complete ref- 
erence manual. 

FULL 5-YEAR WARRANTY. 

PowerText does everything we say it will 
do. If it should ever fail to perform as spe- 
cified, Beaman Porter, Ine. will fix it at no 
charge, anytime within 5 years after 
you’ve bought it. 


SYSTEM REQUIREMENTS. 

PowerText is a self-contained, bootabie 
system, that supports both serial and par- 
allel printer interfaces. You’ll need your 
Apple II with 64K, 2 disk drives, and a 
printer. 

COMPLETE APPLE II POWERTEXT 
SYSTEM SOFTWARE PLUS TUTORIAL AND 
MANUAL $299. 

SPECIAL! PowerText plus easily-installed 
PowerCase chip for Apple II upper/lower- 
case and shift key capability, just 
$329.95.) 

(PowerText for Apple II and III users who 
have Apple Pascal, $199.) 

(PowerText is also avallatile for IBM PC. 
Write for information.) 

Tutorial/manual alone for any version: $25. 

Available from selected dealers. Or order 
directly from Beaman Porter. 

VISA and MasterCard aocepted. NY State 
residente add appropriate sales tax. 


I-1 

I BEAMAN PORTER, INC., DEPT. STA-3 J 

I Pleasant Ridge Road ’ 

j Harrison, NY 10528 | 

I □ Send_complete PowerText sys- I 

| tem(s) for Apple II @$299. □ With Power- | 
Case upper/lowercase chip $329.95. 

| □ I have Apple Pascal. Send_ j 

complete PowerText system(s) for 
I □ Apple II or □ III @$199. 

I □ Send tutorial/manual only, for 

| _version @$25. 

| (NY State residents add appropriate | 

sales tax) j 

My check or money order for j 

$_enclosed. I 

■ □ Or bill $_to my: ; 

□ MasterCard DVisa s 

(MasterCard only list 4 digits above your ; 
I name_) I 

[ Card No_Exp. Date_ J 

I Name_ I 

Street_ 

| City, state, ZIP_| 

I_I 


TO 

Vi 








PowerText 

BEAMAN PORTER/ INC. 

High Performance Computer Products 


Pleasant Ridge Rd. Dept. STA-3 
Harrison, NY 10528 (914) 967-3504 


May 1983 Èider 63 


Circle 271 on Reader Service card. 











-Pascal- 

Blaising Bibliographies 

Part II 


Compiling information sources into an 
organized list can drive a writer to wrack and ruin. 

This article, thè second in a three-part series, 
continues thè discussion of using Pascal text editing 
to overcome thè bibliography blues. 


arch’s issue of inCider includ- 
ed my REFCITED program, 
which finds all reference citations 
(in thè “name, year” format) in any 
Pascal textfile. The analysis has been 
an important aid to my writing for 


by James R. Fiorini 


thè last two years. However, it be- 
comes much more useful when it is 
coupled with two more programs: EN¬ 
TERREF, which prepares thè files of 
citations used frequently in my writ¬ 
ing, and REFPRINT, which prints out 


thè complete formatted bibliography 
using thè Citelist.Text file to specify 
thè citations to be listed. 

I use thè System in thè following 
way. Whenever I cite a paper for thè 
first time, I use Enterref to enter thè 
complete citation on master disks (for 
which I keep at least two backups at all 
times!); two disks hold about 450 list- 
ings, which should be enough for all 
but thè most dedicated scholars. My 
students also make entries when they 
are writing papers (or dissertations) on 
related subjects. 

Whenever a manuscript is complet- 
ed, I analyze it with thè Refcited pro¬ 
gram to get a list of citations. Using 
that list, I then run thè Refprint pro¬ 
gram (to appear in thè next issue of in¬ 
cider) to print thè completed bibliog¬ 
raphy and store it as a textfile. The 
whole thing is virtually automatic; all 
I need do is specify thè files to be ana- 
lyzed, change disks between thè ana- 
lyzing and printing programs, and 
make a few formatting choices in re- 
sponse to prompts from thè Apple. 

This month’s program is a rather 
unexciting but absolutely essential part 
of thè system. Without thè listings 
formed using Enterref, you can’t get a 


Address correspondence to Dr. James R. Fiorini, 
Biologi / Dept., Syracuse University, Syracuse, 
NY 13210. 


EXAMPLES DF FORMAT IN WHICH REFERENCE CITATIONS ARE ENTERED 
(USING THE ENTERREF PROGRAM) 


KEYl 
AUTHORS1 : 
AUTHORS2: 
YEAR: 
TITLEla 
TITLE2: 
TITLE3: 
JOURNAL: 
VOLUME: 
PAGES: 

KEY: 
AUTHORS1 : 

J. J. 
AUTHORS2: 
YEAR: 
TITLE1 x 
Tel 1s You 
TITLE2* 
ible 

TITLE3: 

JOURNAL: 

VOLUME: 

PAGES: 


Fry, 1979 
Fry, F. F. 


1979 

A Short Paper on Important Thinqs 


Essential Information 
1 

1-4 

Fink et al-, 1974 

Fink, F. F., Anderson, A. A-, Smith, S. S., Jonson, J. J., Jones, J 

Clark, C. C., Thomas, T. T., Williams, W. w., and James, J. J. 

1974 

One of Those Reports with an Absolutely Ineredibly Lonq Title Which 

a Great Deal More than You Want to Know about thè Article: All Poss 

Consi derations of All Possible Aspects of thè Subject 
J. Nonsuccinet Reports 
111 
1-10 


THESE CITATIONS WOULD BE PRINTED OUT IN A FORMAT SIMILAR TO THOSE BELOW: 

Fry, F. F. A Short Paper on Important Thinqs. Essential Information. 1: 1-4, 
1979. ^ 

Fink, F. F., Anderson, A. A., Smith, S. S., Johnson, J. J., Jones, J. J. 

Clark, C. C., Thomas, T. T., Williams, W. W., and James, J. J. One of Those 
Reports with an Absolutely Incredibly Lonq Title which Tells You a Great Deal 
More than You Want to Know about thè Article: All Possible Considerations of 
All Possible Aspects of thè Subject. J. Nonsuccinct Reports. Ili: 1-10, 

1974. 


Figure 1 . Reference citation format. 
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s o FTWARE 



Low Discount Prices / 15% to 25% Discount off List Price 
Fast Convenient Service / We ship some or next day 
Large Selection of Software / Cali or Write for our FREE Catlog! 


We have all thè latest 
software—ASK US! 


Cali Toll Free: (800) 423-5290 In California: (213) 991-9641 




Séjfrvu 


BEAGLE "c'. 

DOS Som. 24.00 

Utility City. 29.50 

Apple Mechanic. 29 50 

Pronto OOS . NEW.. 29.50 

FlexText . NEW.. 29.60 

BRODERBUND 

Appiè Panie. 29.95 

Davkfs Midnight Magic. 34.95 

★The Arcade Mac bine . 59.95 

Star Blazer. 31.95 

Choplifter. 34.95 

Deadly Secreta. 34.95 

★ Serpentine. 34.95 

Sea Fox. 29.95 

AE. NEW ,. 29.95 

Bank Street Writer. NEW.. 59.95 

CONTINENTAL 

★HomeAccountent. 74.95 

CPA Modules #1-4 (each). 25000 

First Class Mail. 74.95 

TaxAdvantage. NEW.. 59.95 

DATA MOST 

Snack Attack..i. 29.95 

Swashbuckler. 34.95 

Casino. 39.95 

PigPen . 29.95 

Tubeway. 34.95 

★Aztec. NEW.. 39.95 

EDU-WARE 

Rendezvous. 39.95 

Prisoner 2. 32.95 

★Algebra sertes (each) . 39.95 

Fractions/Decimala (each). 49.00 

PSAT/SAT Word Skills (each). 49.00 

TAX PREPARER (1983) 
168.75 

HOWARD 

Creative Financing. 195 00 

Real Estate Analyzer II. 195.00 

INFOCOM 

★ZortU, 11, HI (each) . 39.95 

Deadline. 49.95 

Starcross .. 39.95 

MICROSOFT 

Typing Tutor II. 24.95 

★TASC Compilar . 175.00 

RAM Card. 99.95 

Multiplan. 275.00 


PENGUIN pi’c. 

Compiete Graphics System. 69.95 59.45 

★Graphics Megfcian. 59.50 44.95 

Special Effects. 39.95 33.95 

Spy’s Demise . 29.95 25.45 

Transylvania . 34.95 29.7Ó 

SENSIBLE 

Super Disc Copy III. .. 30.00 25.50 

Multì-Disc Catalog . 25.00 21.25 

★tenalWe Spellar. 125.00 93.75 

SCREENWRITER il 

_ 1 2*05 97.45 _ 

SIERRA ON-LINE 

HFRES Adventures 0*5 ... i. 15% OFF 

OarkCryatai . 39.95 33.95 

Cross Fire . 29.95 25.45 

★USA. 79.95 59.95 

General Manager. 229 95 193.20 

Screen Writer Professional . 199.96 159.95 

★Ultima II . 59.95 44.95 

★ Progger. 34-95 26.20 

Cannonali Blitz . 34.95 29.70 

TheArtist . 79.95 97.95 

Laf-Pak. 34.95 29.70 

PestPatroi....29.95 25.45 

Lunar Leepers. 29.95 26.45 

Jawbreaker (all new version).NEW.. 29.95 , 25.45 

Night Flight . NEW.. 29.95 26.46 

SIR-TECH 

Wizardry . 49.95 42.46 

Knight of Diamonds . 34.95 29.70 

Star Maze. 34.95 29.70 

SOFTWARE PUBLISHING 

★ PFS . 125.00 93.75 

★PFS: Aaport.,. 95.00 71.25 

PFS; Graph. 125.00 105.28 

SOUTH WESTERN 

Merlin. 64.95 55.20 

Ascii Express Professional. 129.95 110.45 

Z-Term. 99.95 94.95 

STONEWARE 

DB Master Utility Pak # t . 99.00 54.16 

DB Master Utility Pak #2 . 99.00 54.15 


TG PRODUCTS 


★Joystick. 59.95 44.95 

Game Paddles . 39 95 33.95 

Select*a*Port. 59.95 50.95 

★Traek Ball.NEW 64.95 48.70 


SIRIUS SOFTWARE Pn ce Price 

Gorgon . 39 95 33-95 

The Joyport . 49.95 42.45 ' 

★ Kabul Spy. 34.95 25.20 

Bandita . 34 95 29.70 

Escape from Rungistan. 29.95 25.45 

Free Fa». 29.95 25.45“ 
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Type Attack . 39.95 33.95 
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DB MASTER 
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STRATEGIC SIMULATIONS 

Southern Commsnd. 59.95 50.95 

Napoleon e Campaigns. 59.95 50.95 

★ ftoad toGettyaburg . 59.95 44.95 

Pursuit of thè Graf Spee. 59.95 50.95 

★Guadalcanal Campalgn. 59.95 4A.95 

Cytron Masters. 39.95 33.95 

Galaclic Gladiatore. 39.95 33.95 

The Cosmic Baiane® . 39.95 33.95 

Germany: 1985 . 59.95 50.65 

Battle for Normandy. 39.95 33.95 

★Galactle Avventure . NEW . 59.95 44.95 

BombAlley. NEW.. 59.95 50.95 

Epidemie. NEW.. 34.95 29.70 

Fighter Command . NEW.. 59.95 50.95 

VISICORP 

«Vincale . 390.00 103.79 

«VlaltmniVVIalpIot . 300.00 229.00 

Visitile. 250.00 100.09 

We a/so carry complete lines from thè 
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BUDGECO • CAVALI E R 
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_ ' Order. Calitornia residents adde% sales tax Include $2.00 torshipping(UPS Blue Label$3.00, Canada 

346 N. (Cartari Rd. #103 t6.00, other toreign countrìes 10% ot order - minimum $ 10.00). 
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Lùtmg. 

ENTERREF. 


bibliography printout. I have included 
as Figure 1 an example of thè kind of 
data you might enter and store; it 
would be relatively easy to modify thè 
program to print out all thè listings in 
this sort of format, but I’U leave that 
kind of expansion for you to do. The 
program’s long enough as it is! 

Before you type in Enterref, take a 
careful look at thè structure of thè ma¬ 
jor data type, thè reference record. It 
fits well thè kinds of biological papers I 
usually ci te, but you may want to 
make revisions for your own purposes. 
String variables take up a lot of space, 
and, if you need fewer or shorter lines, 
you can increase thè number of records 
per disk by decreasing or deleting some 
of thè elements of thè records. On thè 
other hand, you most certainly don’t 
want to discover that you haven’t al- 
lowed enough space and have to 
change thè record format after a few 
hundred entries have been made. A lit¬ 
tle thought now can save a lot of an- 
guish later—but that’s always thè case 
in writing a program. 

How It Works 

Now refer to thè Enterref listing. 
Reading fróm thè end (as always in 
Pascal), thè program starts by provid- 
ing a brief menu of choices, and uses 

Get_Char to restrict input to thè ac- 

ceptable replies. If you added thè En¬ 
tries unit (from thè January 1983 issue 
of inCider) to your System iibrary, you 
can substitute USES ENTRIES; for thè 

Val and Get_Char functions. But, if 

you do, remember to use ROUND (VAL- 
UE(ENTRY)) for VAI. (ENTRY); thè more 
extensive function in thè Library Unit 
returns a reai, rather than an integer, 
number. 

Depending on thè initial choice 
made, thè program prompts for a cita- 
tion to be entered. I’m rather fond of 
thè approach in Choose__Record; it 
allows thè user to make a choice and 
enter information at thè same time. All 
thè files are designated by thè initial 
lettere of thè firet author’s name, 
which keeps everything short but 
clear. 

Get_File searches through all possi- 

ble disk locations for thè desired file (it 
really doesn’t take long), and then pro- 
vides an opportunity to insert a differ- 
ent disk or to form a new file if neces- 
sary. It is essential to set aside a specific 
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(**V-*) tNecessary to let ENTER_ONE work on various 1mgths of stringe) 

PROGRAM ENTERREF; 

<By Dr. J. R. Fiorini, Biology Dept., Syracuse University) 

<This program forme files of reference citations to be used with rtfeFPRINT to 
print out bibliographies.) 

CONST CThese are for thè Apple screen; console» require different values.J 
SCREENCLEAR-12; HOME*19; 

TYPE 

RI6HTSET = SET OF CHAR; 

REFERENCE = RECORD {NOTE -IT IS ESSENTIAL THAT THESE STRINO LENBTMS) 

KEYs STRING; CNOT BE CHANGED! ! ? !) 

BOOK; BOOLEAN; 

AUTHORS1: STRING; 

AUTHORS2! STRING; 

YEARs STRING C63; 

TITLEls STRING; 

TITLE2: STRINO; 

TITLE3: STRING; 

JOURNALt STRING; 

VOL: STRINO C4); 

PAGES: STRING CI3); 

END; 

VAR 

FOUND, EMPTY, QKl BOOLEAN; 

RECNUh: INTEGER; 

CHOICE: CHAR; 

INITIAL: STRINGE 11; 

TEST, CITATION, F1LENAME* STRINO; 

PRINTOUT* TEXT; 

SOURCEFlLEs FILE OF REFERENCE; 

{Theee firet procedures are a group of handy Utilities frequently used ) 
PROCEDURE CLEAR.SCREEN; 

BEGIN 

WRITE <CHR(SCREENCLEAR) v CHR(HOME))| 

WRITELN ('MEMORY AVAILABLE IS * *39,MENAVAIL,’ WORDS.’>; 

WRITELN; WRITELN 
END; 

PROCEDURE GET.RECORD; 

BEGIN 

SEEK (SOURCEFILE, RECNUM); GET (80URCEFILE) 

END; 

PROCEDURE PUT.AWAY; 

BEGIN 

SEEK (SOURCEFILE, RECNUM); PUT (SOURCEFILE) 

END; 

FUNCTION VAL (ENTRY* STRING): INTEGER; CAvoid problems with numeric entries) 

VAR I, TEMPi INTEGER; 

DIGIT* STRINOCI]; 

BEGIN 

TEMP:=Oj IF LENGTH (ENTRY)-0 THEN VAL:=0 ELSE 
BEGIN 

FOR Il-l TO LENGTH (ENTRY) DO 
BEGIN 

DIGIT*-' '; DIGITI11*-ENTRYCII; TEf*>:-IO*TEMP ♦ POS (DIGIT,'123456709'); 
END; 

IF TEMP < O THEN TEMP*=0; (used only for positive record number e bere) 

VAL:=TEMP; 

END; 

END; {VAL) 

FUNCTION GET_CHAR (FIRST, SECONDI STRING; OKCHARl RIGHTSET)l CHAR| 

{This function avoids "out of bounds" responeee) 

VAR RESPONSE» CHAR; 

8E6IN 

REPEAT 

WRITE (FIRST); IF SECONDO” THEN 
BEGIN 

WRITELN; WRITE (SECOND); 

END; 

READ (RESPONSE); WRITELN; IF RESPONSE=CHR(27) THEN EXIT (PROGRAM); 

IF RESPONSE IN t'a'..*z*] THEN RESPONSE*-CHR(ORD(RESPONSE)-32); CCapitalize) 
IF NOT (RESPONSE IN OKCHAR) THEN WRITELN (CHR(7), 

' »REBPONSE,'" IS NOT AN APPROPRIATE RESPONSE.’); WRITELN; 

UNTIL RESPONSE IN OKCHAR; 

GETCHARl-RESPONSE; 

END; {GET-CHAR) 

{Now some more specialized procedures important in THIS program) 

PROCEDURE SEARCH.F1LE (VAR REF*REFERENCE); 

BEGIN 

RECNUM* -RECNUM* 1; GET .RECORD; TEST i =S0URCEF I LE*** • KEY ; 

WRITELN ('Citation is '.TEST,' in record RECNUM) 

END; 

PROCEDURE SHOW.REF; 

BEGIN 

WRITELN ('This is record RECNUM,’ in file ',FILENAME,’*’>; 

WRITELN; WITH SOURCEFILE~ DO 
BEGIN 

IF KEY-’XXXXX' THEN 
BEGIN 

WRITELN ('Record RECNUM,' is empty.'); 

EMPTYl-TRUE; DK:=TRUE| EXIT (SHOW.REF); 

END; 

EMPTY*-FALSE; WRITELN (’KEY* ’: 13,KEY); 

WRITELN ('AUTHORS1; '*13, AUTHORS1); 

IF AUTH0RS2 <> '* THEN WRITELN (’AUTH0RS2* '*13, AUTH0RS2); 

WRITELN ('YEARi '*13, YEAR); 

WRITELN <’TITLEi: ’113,. TITLEI>; 

IF TITLE2 <> ” THEN WRITELN ('TITLE2: ’i13,TITLE2); 

IF TITLE3 <> ” THEN WRITELN (’TITLE3* 'l13,TITLE3); 

Listini* contitiuerf. 
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You Pick The Disk System, MegaFiex Controls It! 



WITH SOFTDRIVERS FOR 
A FLEXIBLE FUTURE! 

MEGAFLEX— a universal 
floppy disk controller and 
modern alternative to thè 
Apple drive System offering 
increased Storage, im- 
proved reliability and . . . 

FLEXIBILITY. 

Enjoy megabytes of 
Online Storage with your 
choice of micro, mini, or 
maxi drives—or even 6Mb 
with thè Amlyn cartridge 
pack! Ideal for high- 
capacity Storage now, 
winchester-disk backup 
later. 

The MEGAFLEX secret is to autoboot soft- 
drivers that match thè needs of your drive System. 
All hardware functions are software-controlled. 
MEGAFLEX can match new drive capabilities with- 
out hardware changes. Drive-dependent ROMs 
have been eliminated. 

APPLE III ? OF COURSE!! 

MEGAFLEX is compatible with BASIC, CP/M, 
Pascal, VISICALC, SOS and DOS-emulation on thè 


BRIDGE THE APPLE 
FORMAT BARRIER! 

The MEGAFLEX diskette 
does what Apple’s 
cannot—read and write 
diskettes from other 
computers! Software- 
controlled industry-stan- 
dard IBM 3740 or System 
34 type formats allow thè 
MEGAFLEX library of refor- 
matting software to read 
and write Altos, Radio 
Shack, Osborne, and IBM 
PC diskettes. (Cali for thè 
latest software details.) 
MORE STORAGE, MORE 
UNIVERSAL FEATURES, LOWEST COST 
MEGAFLEX with 8" maxi or high density 5.25" 
minis gives you 1.2 Megabyte of formatted data per 
diskette for 8 times thè file and data size! 
MEGAFLEX offers flexible software choices: 

• data rate (250/500 Kbits per second), 

• single and doublé density recording, and 

• single/double sided drive operation (max 
4 drives). 

MEGAFLEX has thè iowest chip count of any 


Apple III, Apple II, Franklin Ace and Basis. All lan- controller today! This means less power, a cooler 
guage features and operating System commands Apple and better reliability. 

(LOAD, BRUN, etc.) are standard. If you can oper- Lowest price, highest performance, that’s 
ate Apple drives you can op¬ 
erate MEGAFLEX! Your 
Apple software will run with- 
out modification too. 


MEGADYTER 


A Division of SVA 


MEGAFLEX! 

11722 SORRENTO VALLEY ROAD 
SAN DIEGO, CA 
(619)452-0101 

TWX 910-335-2047 APPLE TWO SDG 
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$UPER $AVINGS ON SOFTWARE 
FOR APPLE OWNERS 


Choplifter 
Snack Attack 
Mastertype 
Home Accountant 
Frogger 


22.99 

19.99 

26.99 

51.99 

22.99 


PFS: Report 64.99 

PFS: File 88.99 

Supertext 40/56/70 122.49 
Zork I 26.99 

Sensible Speller 88.99 


HUNDREDS MORE AT DISCOUNTS 
OF 25-33% OFF RETAIL 


• Free Catalog 

• By Mail or Phone 

• Satisfaction Guaranteed 



• Open 8-6, M-F and 
10-3 Sat. 

• Charge Cards Welcome 

(No extra charge) 


— Cali today — 


s 


ULCAN OOFTWARE 


1805 SAULTER ROAD 
BIRMINGHAM, AL 35209 

( 205 ) 871-5510 * 


Add $3.00 for shipping regardless of thè size of your order 
APPLE IS A REGISTERED TRADEMARK OF APPLE COMPUTER. INC 



Big Al here.Me and thè boys got 

sick and tired of listening to all thè excuses 
from my representatives about power 
problems on their computers. Being in thè 
Book Business, this can get expensive... 
losing customer records of purchases and 
mm payables. 

To remedy this and to keep our agents’ 
heads above thè water (so to speak) we got 
us a truckload of MAYDAYS from SUN 
RESEARCH. 

Even at retail, they are a bargain...only 
$325.00 for a 150 watt Uninterruptible 
Power Supply with voltage regulator and 
battery. Keeps our computer free of 
problems caused by brownouts and r pfopffls 
blackouts and other bad stuff on thè line. 
And small enough to be moved in case you 
have to pack up and leave quickly. 

So, buy a MAYDAY...if you know what’s 
good for you. 


MAYDAY Division 

SUN RESEARCH, INC. 

Box 210, New Durham, NH 03855 
603/859-7110 TWX 5102974444 










Circle 255 on Reader Service card. 


it k k k k k k k k k k k k 

* The Electronic * 
t Astrologers m * 

cast an accurate horoscope for any lime from *fc 
1880-2000, then teli you what It means! Per- 
4" sonallzed astrological reading is 1500+ -+( 
words, based on unique relation of all 

* planets, Ascendant & MC at birth. + 

3 +. ASTRO-SCOPETM reads birth chart; your ^ 
character strengths & weaknesses. Text by 
jL Steve Blake & Robert Hand. Screen ve raion, ^ 
$30, for Apple* w. Applesoft*, disk, 32K RAM. 
Prtntlng ve raion w. commarclaluaa llcenae, > 
$200, needs 48K. ^ 

SEX-O-SCOPETM. Same format & prlces, w. * 
^ witty R-rated text by John Townley. ^ 

^ Monthly, yearly & relatlonship horoscopes soon! ^ 

AGS also speclalizes in highly accurate calcu- 

* lation-only programs doing natal, progressed, ^ 
transiting, return, mldpoint, nartnonlccharts, and 

>r more. For catalog, phone 617/2580510. M 


In Mass, add 5% sales tax. We take MasterCard & Visa. ^ 
^ *Reg. TM ol Apple Computer Corp. ^ 

AGS Software 

* Dept I, Box 2B, Orleans, MA 02653 * 

k k k kkkkkkkkkk 
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AIR NAVIGATION TRAINER 

by KEN WINOGRAO 



HerViWhat Ttiey’re Saylng About A NT: 

PEELINGS »(**(Dee 1982): " thè tuncttonlngof Ihetraineriajust IHte 
a reai akeraft navlgatlrrg by radio. Air Navigalktn Trainar is an exceUent 
learning aid and uslng it is easy. Aithough it is not a game. <t is also fun 
to use." 

INFQWORLD*** (9/20/82): ". . . thè program is bomb-prool.' Alter 
using thè program for many hoors, I teel I am a sharper pilot, and I dld It 
at homo — not in thè air at a cosi o( $40 fo $50 per hour.“ 

IFEATURES: 


I » Htgti RosoMlofi Graohic* 

• Sound EflsctottncfcKtes SHIlon ID'st 
• S VOWStVHF Omr*«nge Reda,) 

• 2 von necelvers (adluataW* OBSi 
• 2N08" a iNoo-Dkeeikmal Beeeon) 

I ADHAutorraHc tMreclonflnder) 

4 OHtevonl Skmrtnllonj S VOH Perno 


• Qfound TracK Mop (Adjueto! e Scale) 

• Conslanl Or VartaWe Wlnd S-iectton 

• Wlnd Magnllude 6 «recito»! Ad*)») 
e «essila w« Etepsed Itine irmcaior 

• Cen Be Fbwn Reat-TVne or Fesler 

' e Full Oocumen1«Hon{8eflEinerS. Tool 

• Hold on a VOfl or NOB Fhr 


$40.00 (U.S. Funda). 

I AIR NAV TRAINER.A HIGHER EDUCATI ON 

Requlres APPLE* ll/tf+/lla/m.48K. DOS3.3. ASlnROMlorequiv ) 
41 Yovt Locai Dottar or Dlracl from. 

SPACE-TIME ASSOCIATES 

20-39 Country Club Drive 
* Manchester, NH 03102 

(603) 625-1094 


m 


a 
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— Proiessional — 

REAL ESTATE SOFTWARE 

for APPLE, THS-80 & CPM SYSTEMS 

• PROPERTY MANAGEMENT SYSTEM: $450 

Tenant Mistory 

Operatmg Stmt. 

Late Rent Report 

Building Reports 

Vacancy Report 

Utilities Report 

Income Report 

Tax Expense Report 

Auto Late Charge 

Prints Checks 

Returned Checks 

Prints Receipts 

• PROPERTY LISTINGS-'COMPARABLES: 5325 1 

— SCREEN BY —— 

Max/Min Price 

22 Items/Listing 

Max Price/lncome 

1000 Listing/Disk 

Max Price/Sq Foot 

Listing lYìemo Field 

Min Cashflow 

• REAL ESTATE ANALYSIS MODULES: S50/Module 1 

Home Purchase 

Tax Deterreti Exchange 

Income Prop Anaiysis 

APR Loan Anaiysis 

Property Sales 

Loan Amortization 

Construction Cost/Protìt 

Depreciation/ACRS Anaiysis 

Loan Sales/Purchase 

Loan Wrap Anaiysis 

• WORD PROCESSOR 

- WORD STAR: $295 



Tir^ 

At Computer Stores Everywhere 

! 1 1 Oftware 

or Oider CO0 Direct 

,M Cai Rasidents add 6’/»% Sales Tax 1 

I aealty 1 lompany j 

1 <213)372-9419 f 

Suite E. I116-8th Street. 

Manhattan Beach. CA 90266 J 
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Liating contmuetl. 

END; <NOT OPENED> 

END; {GET—FILE> 

{The following are thè two major procedures in this program) 

PROCEDURE CHANGE^REF; 

VAR ENTRY: STRING; 

PROCEDURE REMOVERONE; 

BEGIN 

ÌF EMPTY THEN EXIT <REMOVE_ONE); 

IF CHOICE = * E* THEN 
WITH SOURCEFILE~ DO 
BEGIN 

CLEAR_SCREEN; WRITE <CHR<7)); SHOW_REF; WRITELN; 

IF GET_CHAR ('Do you REALLY want to remove this reference?', ” , 

C’Y’,'N'3)=’Y' THEN 
BEGIN 

ZERO_REF (SOURCEFILE'"); PUT_AWAY; 

WRITELN ('Reference *,initial,': *’,recnum,’ has been removed.’); 
OK:=TRUE; EXIT (CHANGE_REF); 

END; 

END; 

END; CREMOVE-ONE> 

PROCEDURE FINISH,IT; 

BEGIN 

REPEAT END_IT UNTIL OK; EXIT (CHANGE_REF); 

END; 

PROCEDURE CONTINUE_CHANGES; (AVOIDS "PROCEDURE TOO LONG M 5 
BEGIN 

WITH SOURCEFILE'"' DO 
BEGIN 

IF NOT BOOK THEN 
BEGIN 

WRITELN <’OLD JOURNAL = ',JOURNAL); 

IF NOT ENTER_ONE (80, 'NEW JOURNAL',JOURNAL) THEN FINISH_IT; 

WRITELN; WRITELN ('OLD VOLUME = ’, VOL); 

IF NOT ENTER_ONE (4, 'NEW VOLUME',VOL) THEN FINISH_IT; 

WRITELN; WRITELN ('OLD PAGES = ’,PAGES); 

IF NOT ENTER_ONE <15, 'NEW PAGES', PAGES) THEN FINISH_IT 
END ELSE 
BEGIN 

WRITELN (’OLD PUBLISHER = JOURNAL); 

IF NOT ENTER_ONE(80,'NEW PUBLISHER & CITY',JOURNAL) THEN FINISH_IT; 

END; 

END; <WITH SOURCEFILE^ D0> 

END; {CONTINUE-CHANGESJ 

PROCEDURE UPDATE_KEY; {Make CERTAIN year and key agree) 

VAR DATE: INTEGER; 

BEGIN 

WITH SOURCEFILE A DO 
BEGIN 

DATE: =POS < ' 1*?' ,KEY> ; IF DATE< >0 THEN 
BE6IN 

DELETE (KEY, DATE,4); INSERT (YEAR,KEY,DATE); 

END ELSE KEY:=CONCAT (KEY,', ',YEAR); 

END; 

END; 

PROCEDURE CHOOSE _RECORD; 

VAR ENTRY: STRINGE23; 

RESPONSE: STRING; 

BEGIN {This algorithm lets thè computer find things wìth minimal entries 
from thè user — thè way things SHOULD be!) 

WRITELN; WRITELN 

(’Find thè record on thè basis of its Number or thè Citation?'); 

WRITELN 

('If Number, then enter thè first letter of thè record which contains thè'); 
WRITELN 

('record; if Citation, enter it in thè usuai “name, year" format.'); 

READLN (RESPONSE); 

IF LENGTH (RESPONSE)=1 THEN 
BEGIN 

WRITE ('What record number in file RESPONSE,' is to be changed? 

READLN (ENTRY); RECNUM:=VAL(ENTRY); 

INITIAL:=RESPONSE; GET_FILE; GÉT_REC0RD 
END ELSE 
BEGIN 

CITATION:^RESPONSE; INITIAL:-COPY(CITATION,1,1); GETTILE; RECNUM*=-1; 
REPEAT SEARCH^FILE (SOURCEFILE^) UNTIL (TEST=CITATION> OR EOF(SOURCEFILE); 
IF EOF(SOURCEFILE) THEN 

WRITELN ('There is no reference stored for citation CITATION,'.'); 

END; 

END; {CHOOSE—RECORD > 

BEGIN {MAIN CHANGE REFI 

IF NOT FOUND THEN CHOOSE_RECDRD; CLEAR_SCREEN; SHOW_REF; WRITELN; WRITELN; 

WITH SOURCEFILE^ DO 
BEGIN 

CHOICE:=GET_CHAR<'Enter “E” if this record is to be erased.', 

'( <SPACE> to continue corrections.)',C'E’,’ ’,'Q'3>; REMOVE_ONE; 

IF CH0ICE=’Q' THEN FINISH_IT; 

BOOK:=GET_CHAR('Is this a book? ', " ,C'Y’,’N'3) = 'Y'; 

WRITELN; WRITELN (’OLD KEY = KEY); 

IF NOT ENTER_ONE (80,'NEW KEY',KEY) THEN FINISH_IT; 

YEAR:=COPY(KEY, LENGTH(KEY)-3, 4); 

WRITELN; WRITELN (’OLD AUTHORS 1 = ',AUTHORS1); 

IF NOT ENTER_ONE (80,'NEW AUTHORS l’,AUTHORSl) THEN FINISH_IT; 

WRITELN; WRITELN (’OLD AUTHORS 2 = ',AUTHORS2); 

IF NOT ENTER_ONE (80, 'NEW AUTHDRS 2’,AUTH0RS2) THEN FINISH_IT; 

WRITELN; WRITELN ('OLD YEAR = YEAR); 

IF NOT ENTER_GNE (6,'NEW YEAR’,YEAR) THEN FINISH_IT; 

UPDATE„KEY; 


Listing continued. 
















Internationally acclaimed 
The ultimate in copy de-protection 

CRACK-SHOT is a total System comprised of hardware and software 
modules. CRACK-SHOT is easy to use, designed for users and 
programmerà. Eliminates “owners paranoia” about disk failure. 
Provides quick, easy, reliable archivai backups for criticai software 
with a flip of a switch. Allows transferal software to hard disk. 

Be an Arcade King. Use CRACK-SHOT^i^^B as a gaming tool 
to stop, start and save a game at any level. 


Your total CRACK-SHOT System consists of: 
a sophisticated hardware device, 
advanced state software Utilities, 
and a 70-page users manual. 

Price: $149.95 

Optional Hot-line available for only $15.00 
24 hours a day, 7 days a week, providing 
System updates to registered owners. 

Cash, check, money order, MasterCard 
or VISA accepted. 

for MasterCard and VISA orders onlyl 
Cali now! Toll free! 

1-800—824-7888 Ask for operator 68 
in California 

1-800—852-7777 Ask for operator 68 

9 Pirates Harbor 

^ P.O. Box 8928, Boston, MA 02114 617-720-3600 MODB1 

Apple is a registered trademark of Apple Computer. CRACK-SHOT io thè trademark of PiratpoTfarbor. 
System requirements: 48K Apple II or Apple II Plus. 1 disk drive, Ramcard helpful but not required. 
CRACK-SHOT is intended to be used as a programmerà aid, gaming tool, and legai archivftlbackup of your programs. 

CRACK-SHOT should not be used for illegai pur pose»* ' 
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Attache-style cases for carrying and pro- 
tecting your complete computer set-up. 
Accommodates equipment in a fully oper- 
ational configuration. Never a need to 
remove equipment from case. Simply 
remove lid, connect power, and operate. 

API 01 Apple il with Single Drive $109 
API 02 Apple II with Two Disk 

Drives 119 

API 03 Apple II, 9 Inch Monitor & 

Two Drives 129 

API 04 Apple III, Two Drives & 

Silentype Printer 139 

API 05 13" Monitor with 

Accessories 99 

API 06 AMDEK Color Monitor 119 
RS201 TRS-80 Model I, Expansion 

Unit& Drives 109 

RS204 TRS-80 Model III 129 

AT301 ATARI Computers with 

Peripherals 109 

P402 Centronics 730/737 & 

Radio Shack Printer 89 
P403 Epson MX70/80 or 

Microline 82A 89 

P404 Epson MX100 Printer 99 

P405 IDS 560 or Prism 

132 Printer 109 

P406 Starwriter/Printmaster 

F-10 Printer 119 

P407 Okidata Microline 

83A or 84 Printer 99 

P408 Prowriter 2 Printer 99 

P409 Prowriter (Apple Dot Matrix) 

Printer 89 

IB501 IBM Personal Computer 129 
IB502 IBM Monitor 99 

HP601 HP41 with Accessories 99 
CM703 Commodore Model 64 

with Drives 119 

CM704 Commodore Model 64 

with Dataset 109 

NS010 North Star Advantage 139 
CC80 Matching Attaché Case (5") 85 
CC90 Matching Attaché Case (3”) 75 
CC91 Matching Accessory Case 95 
CC92 5.25" Diskette Case 49 


IB501 

IB502 

HP601 

CM703 

CM704 


compuTcr casecompanv 

5650 Indian Mound Court 
Columbus, Ohio 43213 
(614) 868-9464 

CALL TOLL FREE 
800 - 848-7548 « ■ 


Listi ng continued. 

WRITELN; WRITELN ('OLD TÌTLE 1 = ',TITLE1); 

IF NOT ENTER_ONE (80,'NEW TITLE l',TITLEl> THEN FINISH_IT; 

WRITELN; WRITELN (’OLD TITLE 2 = ’,TITLE2); 

IF NOT ENTER_ONE <80, 'NEW TITLE 2',TITLE2> THEN FINISH_IT; 

WRITELN; WRITELN ('OLD TITLE 3 =. ',TITLE3); 

IF NOT ENTÈRSONE (80, 'NEW TITLE 3',TITLE3> THEN FINISH_IT; 

CONTINUE_CHANGES; {Split changes into tWQ parts to keep < 1200 Hords) 

END; CWITH...J 

REPEAT END_IT UNTIL OK; CLOSE (SOURCEFILE, LOCK); 

END; C CHANGE—RÈF > 

PROCEDURE NEW_REF (VAR REFsREFERENCE); 

PROCEDURE FINISH_NEW; 

BEGIN 

,END_IT; IF NOT OK THEN CHANGE_REF; 

END; 

BEGIN 

REPEAT 

CLEAR_SCREEN; WRITELN (*<RETURN> SKIPS ITEMS WITH NO CHANGE;'); 

WRITELN ('"Q" BY ITSELF SKIPS THE REST OF THIS REFERENCE.'); 

WITH REF DO 
BEGIN 

KEY:=CITATION; 

YEAR:=COPY(KEY, LENGTH(KEY)-3, 4); 

BODKs=GET_CHAR (’Is this a toook? ','' f C'Y','N’3)=’Y'; 

IF NOT ENTER_QNE (80, 'FIRST LINE OF AUTHQRS: ' , AUTHORS1) THEN FINISHJ'JEWj 
IF NOT ENTER_ONE(80, ’SECOND LINE OF AUTHORS:',AUTHORS2) THEN FINISH^NEW; 
IF NOT ENTER_ONE(BO, 'FIRST LINE OF TITLE:',TITLE1) THEN FINISH_NEW; 

IF NOT ENTER_ONE(80, 'SECOND LINE OF TITLE:',TITLE2) THEN FIN1SH_NEW; 

IF NOT ENTER_0NE(80, 'THIRD (AND LAST) LINE OF TITLE:TITLE3) 

THEN FINISH„NEW; 

IF NOT BOOK THEN 
BEGIN 

IF NOT ENTER_ONE <80, 'JOURNAL NANE:',JOURNAL) THEN FINISH_NEW; 

IF NOT ENTER_ONE (4, 'VOLUME:VOL) THEN FINISH_NEW; 

IF NOT ENTERJ3NE (15,'PAGES:',PAGES) THEN FINISH_NEW 
END ELSE 

IF NOT ENTER_ONE (80,'PUBLISHER Se CITY',JOURNAL) THEN FINISH_NEH; 

END; 

FINISHJMEW; 

UNTIL OK 

END; CNEW_REF> - 

PROCEDURE ADD_REF (VAR REF:REFERENCE); 

VAR CHOICE: CHAR; 

BEGIN 

RECNUM :=—1$ {To start with record number O when incremented) 

REPEAT SEARCH_FILE(SOURCEFILE^) UNTIL (TEST .= CITATION) OR 
(COPY (TEST,1,2) = ’XX’) OR (TEST = ") OR EOF (SOURCEFILE); 

IF EOF (SOURCEFILE) THEN 
BEGIN 

WRITELN ('THERE ARE NO MORE SPACES AVAILABLE IN FILE ',FILENAME,'.'); 

EXIT <ADD_RÈF) 

END; FOUND:=TRUE; 

IF (COPY (TEST, 1,2) = 'XX') OR (TEST = ") THEN NEW_REF (SDURCEFILE~> 

ELSE IF TEST=CITATION THEN (a previous record with this key> 

BEGIN 

CLEAR_SCREEN; WRITELN <CHR<7>, CITATION,' is ALREADY PRESENT.'); 

SHOW_REF; WRITELN; 

CASE GET_CHAR('Do you want to (C)hange it, (Q)uit with no change,', 

'or <A)dd another referente for this citation? *,C’C','Q','A'3) OF 
’Q': BEGIN END_IT; EXIT (ADD_REF); END; 

'C': CHANGE_REF; 

'A': BEGIN 

REPEAT SEARCH_FILE (SOURCEFILE^) UNTIL (COPY (TEST,1,2) = 'XX') 

OR (TEST = " ); 

NEW_REF (SOURCEFILE^) 

END; 

END; <CA5E> 

END; {KEY=CITATION> 

END; CADD_REF> 

PROCEDURE ENTER_CITATION; 

BEGIN 

REPEAT 

CLEAR_SCREEN; 

WRITELN ('Type thè citation (nane, year format) to be entered.'); 

WRITELN ('Press <RETURN> with no entry to exit this part.'); 

READLN (CITATION); 

IF CITATION <>" THEN 
BEGIN 

IN ITI AL: =COPY„(CITATION, 1,1); GETTILE; RECNUM: =-l; 

ADD_REF (SOURCEFILE^); WRITE ('For thè next entry, ') 

END; 

WRITELN; CLOSE (SOURCEFILE, LOCK); 

UNTIL CITATION = ' ' 

END; 

BEGIN IMAIN PROGRAM} 

REPEAT 

CLEAR^SCREEN; FOUNDs=FALSE; 

WRITELN ('Which of thè following is to be done?’)j 
WRITELN (' 1. (E)nter a new reference listing.'); 

WRITELN (' 2. (C)hange or remove a reference now on thè diskette.'); 

WRITELN <’ 3. (Q)uit this program.’); 

CHOICE: =GET_CHAR(' Enter thè number or letter you choose. 

C'1'..'3',’E','C','G)'3); 

CASE CHOICE OF 

'1', 'E': ENTER_CITATION; 

'2', 'C': CHANGE_REF; 

END; {CASE STATEMENT} 

UNTIL CHOICE IN E'3','0'3; 

C LEAR _ SCREEN 
END. 
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DtSK DRIVES DISK DRIVES CHSK DRfVES DISK DRIVES DISK DRIVES DISK DRIVES CHSK ORiVES DISK DRIVES 


DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVES DISK DRIVE8 DISK DRIV 

| PRICE BREAKTHROUGH 

Super Sale on New Disk Drives 

Starting at $199.95* complete!! 


single sided 40 track — dual sided 40 track 
single sided 80 track — dual sided 80 track 

for 

RADIO SHACK — HEATH/ZENITH — APPLE 
IBM/PC - TEXAS INSTRUMENTS & MOST OTHER COMPUTERS o 

SPECIAL! Disk Drive Head Cleaning Kits .. .$12.95 


Now Disk Drives for thè Apple II 

Cali for our Low Price 


TOLL FREE ORDERING 
1-800-343-8841 


GENERAL and TECHNICAL 
1-617-872-9090 


S 


Diskettes of all sizes {Box of 10). starting at $15.95 

Dot Matrix Printers.$Call 

Word Processing Printers . starting at $999.95 

Printer Buffers 8K to 64K.statina .*$133.00 

Disk Drive Casesand Power S upplies. statina at $49.95 


Dealer inquiries invitedl 
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SOFTWARE SUPPORT, INC. 

One Edgell Road, Framingham, MA 01701 
(617) 872-9090 

Hours: Mon. thru Sat. 10 am to 6 pm (E.S.T.) 


TERMS: 

M.C./Visa/Amex and personal 
check» accepted at no extra charge. 
C.O.D. Please add $3.00. 


1 'TANDY CORPORATION 

2 -ZBNITH DATA SYSTSMS 

3 'APPLI COMPUTER CORP. 

4 'IBM CORPORATION 

9 'TEXAS INSTRUMENTS 


Shipping: Please cali for amount. 

Aiaa xsia s3Aida xsia ssAiua xsia sìaiuq xsia S3Aida xsia sbaihq xsia sbaiuq xsia ssAiaa xss 
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After thè big race when thè engines are silent 
and thè crowd has gone home, 
you'll stili have your lap charts to remind you. 



n 

l 

by Earl Johnson | 


I t’s been over 30 years since I began 
following thè Indianapolis 500. I 
can remember standing at thè infield 
fence under thè broiling sun, too poor 
to buy a Coke, and watching Mauri 
Rose sail to victory. Ten years later, I 
had progressed to thè grandstands 
with a cooler of beer at my feet. 

Somewhere along thè line, I began 
keeping lap charts. I found that chart- 
ing thè race was almost as much fun as 
watching it. The charts kept me on top 
of things and created a special history. 
Years went by and I moved to thè West 
Coast, but though I no longer attended 
thè race, I kept up with my annual 
charting, glued to thè radio on race 
morning. 

Using my Apple to chart thè 500 was 
in my mind thè day I brought it home 
from thè store. Thus, Indy (see pro¬ 
gram listing) was written and used for 
thè first time in 1981. It works fine. 

While Indy is specific for thè 
Indianapolis auto race, it could be 
adapted easily for other types of races. 
For instance, you could modify it to 
score your locai marathon run. Using 
data statements for thè entry listings is 
a naturai here, providing considerable 
speed and flexibility. 

The program may look long, but is 

Send yout cards and letters to Earl Johnson, 2781 
Juanipero Way, Medjord, OR 97501. 
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virtually all single statement lines. You 
can shorten it by omitting thè remarks 
lines, although obviously I firmly be- 
lieve in liberally salting your program- 
ming with remarks. They are helpful 
in locating things you’ll want to 
change sometime, especially in a pro¬ 
gram you may not get around to mod- 
ifying until next year’s race. 

Program Operation 

Indy won’t do you much good with- 
out a printer in your System. Its main 
function is to produce printed lap 
charts. If you don’t have a printer and 
can’t get access to one, you’d better 
skip this program. 

Let’s go into thè menu functions: 

1) Enter lap rundown and race 
speeds: During thè race, car positions 
are run down by car number (not by 
driver). A rundown gives positions of 
thè first 10-15 cars. Rundowns are 
usually given on thè first and fourth 
lap, and then after every tenth lap (25 
miles) of thè race. Sometimes things 
get hectic and thè rundowns are de- 
layed. The broadcasters try to catch 
up any missed rundowns when thè 


race is running under thè yellow cau- 
tion flag. Available speeds for these 
rundowns are usually given as 
well-—both thè present speed and thè 
previous record speed. 

I jot thè car numbers down on 
scratch paper as they are run down. 
The reason for this is that sometimes 
thè announcer will make a mistake 
and these rundowns are usually done 
so fast that you don’t have time to back 
up and correct a computer entry. Then 
I enter thè numbers. Sometimes lap 
speeds are omitted, so thè program 
allows you thè option of entering these 
or not. 

Pressing return will print these 
numbers, formatted in a line across 
your page. Usually only thè first ten to 
15 front runners are given in each run¬ 
down. As thè program is written, ten 
positions will fit fine on normal-width 
paper. Removing thè semicolon at thè 
end of line 310 will let you list 15. You 
could rewrite line 330 so thè positional 
numbering is omitted, and thus get thè 
entire field on standard-width paper. 
Unfortunately, positions for thè entire 
field are not given often enough to 
make charting them meaningful. 










BASF QUALIMETRIC" 

ATOTALLY NEW DIMENSION OF QUALITY. 






qualimetric 



BASF 


FlexyDisk 



From BASF comes a totally new 
level of excellence in magnetic 
media-thè Qualimetric stan¬ 
dard, a standard so advanced 
that BASF FlexyDisks ® are confi¬ 
denti backed by an extraordi- 
nary new lifetime warranty.* 
The Qualimetric standard is 
maintained without compro¬ 
mise through everystep of BASF 
design, production, inspection, 
and testing... reflecting an 
unwavering BASF commitment 
to media fidelity and durability. 

Our FlexyDisk jacket incorpo- 
rates a unique two-piece liner 
that not only traps damaging 
debris away from thè media 
surface, but also ensures pre¬ 
cise media-to-head alignment. 
The result-certified 7 00% 
error-free performance, backed 
by BASF's exclusive lifetime 
warranty* 

For Information security, 
tomorrow and beyond, look for 
thè distinctive BASF package 
with thè Qualimetric seal. Cali 
800-343-4600 for thè name of 
your nearest supplier. 

Visit BASF at Comdex, 

Booth 604. 



ENTER tomorrow on 

* Contact BASF for warranty details. © 1982, BASF Systems Corporation, Bedford, MA 
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Maybe they could use an Apple in thè 
broadcast booth. 

When information is entered for 
successive ten-lap rundowns, it is 
printed beneath thè previous entry. At 
thè conclusion of thè race, thè car 
numbers can be connected by lines 
down thè page. This gives a complete 
picture of thè race, graphically show- 
ing who was thè hotshot driver this 
year, thè best position your favorite at 
tained, and so on. 

2) Enter text comments: As thè race 
progresses, you may want to enter text 
comments to be printed to your chart. 
You might use this function to note thè 
reason a car dropped out of thè race or 
to describe an accident. You also might 
want to enter thè interval between cars 
1 and 2, so it will be handy for compar- 
ison following pit stops. Or you just 
might want to update something en¬ 
tered earlier. You are asked for thè lap 
number for thè comment. 

3) Car and driver information: This 
function accesses a submenu that will 
display thè driver of any car on thè 
screen. You may also display or print 
thè entire starting lineup. 

4) Enter cars out of thè race: On oc- 
casion thè cars that are no longer run- 
ning will be announced, more or less in 
thè order in which they went out. Jot 
this information down and enter it. 
You may elect to skip this part, but I 
find it gives me a good idea of how 
things are going to wind up. This is one 
of thè facets of thè broadcast I wish 


were done more often. 

5) Convert seconds/lap to MPH: It is 
sometimes announced that a car is 
turning, say, 45-second laps. You may 
quickly convert this to MPH. This 
function is a screen display. You may 
transfer thè information to paper via a 
text comment if you wish. 

Data Entry 

The program listing contains thè 
1981 race lineup in thè data. I include 
it tp show thè customary way to format 
thè entries. Of course, you’ll want to 
enter information for this year’s race. 

Newspapers print thè starting line¬ 
up, usually in thè format shown. Begin 
checking them a week before race day 
so you can enter thè data at your 
leisure. Make sure thè car numbers are 
provided in thè paper you buy—some 
omit them. You should further check 
thè numbers as they are given in thè 
prerace broadcast to be sure they are 
correct. 

There are 33 cars in thè race. You 
are allowed four data fields per entry. 
The first must be thè car number. The 
second must be thè driver’s name. The 
third is customarily thè builder/ 
engine-type and thè fourth thè qual- 
ifying speed for thè race. You may 
change thè information in thè third 
and fourth fields if you have a better 
way, but thè car number and driver 
must be first and second for proper 
program function. 

Be careful about comma separators 


when entering data statements. You 
must use exactly three commas sepa- 
rating four fields in each data line—no 
more, no less—unless you format to get 
around this. For instance: 

7110 DATA l.RICK MEARS.TENSKE- 
FORD.8 CYLINDER”,207.004 
is a four-field data statement because 
thè third field (and its included 
comma) is enclosed in quote marks. 
Your Apple reads anything in quotes as 
a string. 

Conversely, you can cut thè data 
lines back to just car number and 
driver by adding commas to thè end of 
thè two fields so thè Apple thinks there 
are four. For instance: 

7110 DATA l.RICK MEARS,, 

When you Ve got all thè cars listed, 
try listing thè starting lineup to thè 
screen. Use control-C to stop thè listing 
as desired. It if doesn’t list properly, 
you’ve almost certainly misplaced a 
comma somewhere, probably in thè 
statement just before things went hay- 
wire. A common mistake is placìng a 
comma after DATA. 

Finally, be sure to end thè data list¬ 
ing with 8000 DATA 0 (that’s a zero). 
This allows thè program to find thè 
end of thè data. 

You will want to play with thè pro¬ 
gram a bit before race day to get thè 
hang of it. But once its running, your 
only problem if you live on thè West 
Coast is getting up for thè 8:30 AM 
broadcast. Hópe you like it. ■ 


Program listing Indy top chart program. 


IO REM ********************** 

20 REM * *** INDY *t* * 

30 (REM * LAP CHART PROGRAM * 

40 REM * BY EARL JOHNSON * 

50 REM * MEDFORD. OREGON * 

60 REM ********************** 

70 REM 

100 TEXT : HOME s NDRMAL : CLEAR 

110 DIM T(33): DIM N<33) 

120 GOSUB 520: REM GO TO MENU 
130 REM 
140 REM 

CAR PDSITIONS 

150 REM 
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160 GOSUB 2000 

170 PRINT "RUNDOWN FOR LAP # “ ; : 

INPUT L 
180 N = 1 

190 PRINT : PRINT “ENTER CAR # - 
ENTER O WHEN DONE" 

200 PRINT “POSITION ";N;: INPUT 
X 

210 T(N) = X 
220 IF X = O THEN 240 
230 N = N + ls GOTO 200 
240 PRINT "DONE FOR ";N - 1;" IT 
EMS“ 

250 PRINT : PRINT "DO YOU HAVE A 
VERAGE SPEEDS TO RECORD IN T 
HIS RUNDOWN INPUT A* 

260 IF A* = "Y" THEN GOSUB 400 

Listing contmued. 







Circle 325 on Reader Service card. 


Lifting continued. 

270 PRINT : INPUT "HIT RETURN FO 
R PRINTOUT ":GO*: GOSUB 820 
2B0 REM r 

290 REM 

PROGRAM PROCESSING 

300 REM 

310 F'RINT : PRINT "*** POSITIONS 
FOR LAP # " ;L;" " ; 

320 FOR M = 1 TO N - 1 

330 PRINT "(";M;") ";T(M);“ "; : NEXT 

340 PRINT 

350 IF Ai < > "Y" THEN PRINT " 

(SPEED INFORMATION NOT AVAIL 
ABLE AT THIS ENTRY)" 

360 GOSUB 490 
370 GOSUB 850 
380 GOTO 100 
390 END 
400 REM 
410 REM 

SPEED INFO 

420 REM 

430 PRINT : INPUT "ENTER NEW RAC 
E AVERAGE ”;NS 

440 PRINT : INPUT "ENTER OLD RAC 
E AVERAGE "; OS 

450 PRINT : INPUT "FREVIDUS RECO 
RD YEAR ";YR 
460 LET RS = NS - OS 
470 LET RS = ( I NT (100 * (RS + 

.005))) / ÌOO: REM ROUND OF 
F DECIMAL FIGURE TO 2 PLACES 

4B0 RETURN 

490 IF NS > OS THEN PRINT "NEW 
RECORD OF ";NS:" BETTERS OLD 
RECORD OF "; OS;" SET IN ";Y 
R;" BY ";RS;" MPH" 

500 IF NS < OS THEN PRINT “RACE 
SPEED OF ";NS;" IS BELOW RE 
CORD OF "; OS:" SET IN ":YR;“ 

BY ";RS;" MPH" 

510 RETURN 
520 REM 
530 REM 

MENU 

540 REM 

550 VTAB 4: HTAB IO: PRINT "SELE 
CT FROM:" 

560 PRINT : PRINT 

570 PRINT "1 - ENTER LAP RUNDOWN 
AND RACE SPEEDS" 

580 PRINT : PRINT “2 - ENTER TEX 
T C0MMENT5" 

590 PRINT : PRINT “3 - CAR & DRI 
VER INFORMATION" 

600 PRINT : PRINT "4 - ENTER CAR 
S OUT OF THE RACE" 

610 PRINT : PRINT "5 - CONVERT S 

Listing continued. 




MILLIONAIRE 

THE STOCK MARKET SIMULATION" 

Software for 
Mature 
Audiences 

An adventure that throws you into reality. 
MILLIONAIRE™. The Stock Market 
Simulation™ is a same unlike any you’ve 
played before. The time is now. The place 
is Wall Street and thè world is changing 
rapidly. you make thè decisions. Move 
carefully, your fortune depends on it. 
MILLIONAIRE™, The Stock Market 
Simulation, a computer experience so reai 
you may not be ready for it. Because 
MILLIONAIRE™, gives both thè novice and 
thè expert alike thè chance to find out 
how good they really are and how it feels 
to live in thè financial fast lane. 

A built in program generator allows you to 
command your computer to create an 
entirely new game. So there is no added 
cost for new scenarios. 

If you haven’t played MILLIONAIRE™ you’re 
in for an education. It’s thè adventure in 
reality that you’ve been waiting for! 
Available at finer computer and software 
Stores or may be purchased directly from 
Blue Chip Software. 


BLUE CHIP SOFTWARE 

19824 Ventura Blvd. # 125 
Woodland Hills, CA 91364 
800 835-2246 ext. 234 

Dealer & Distributors (213) 881-8288 
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Listing continued. 


ECONDS/LAF TP MPH” 


620 

PRINT 

AM" 

: 

PRINT 

"6 - END PROGR 

630 

PRINT 
“ ; Y 

5 

INPUT 

"WHICH NUMBER 

640 

IF Y < 

1 

OR Y 

> 6 THEN PRINT 


: PRINT 

" BETWEEN 1 AND 6, PL 


EASE": 

GOTO 630 

650 

IF Y = 

1 

THEN 

RETURN 

660 

IF Y = 

2 

THEN 

GOSUB 2000 

670 

IF Y = 

3 

THEN 

1230 

680 

IF Y = 
B70 

4 

THEN 

GOSUB 2000: GOTO 

690 

IF Y = 

5 

THEN 

1080 

700 

710 

720 

IF Y = 
REM 

REM 

6 

THEN 

390 


TEXT COMMENTS 


730 REM 

740 INPUT “LAP NUMBER FOR THIS N 
OTE; ";LAP* 

750 PRINT : PRINT "ENTER TEXT — 
<UNDER 2 SCREEN LINES FOR 8 
O COLUMN PAPER)“ 

755 PRINT : PRINT "(DO NPT USE C 
DMMAS OR COLONS)“ 

760 PRINT : INPUT Tt: GOSUB 820 


770 

PRINT “NOTE ON 


780 

PRINT "LAP ";LAP*; 

PRINT 


T* 


790 

GOSUB 850 


800 

REM 



PRINTER ON/OFF 



810 

GOTO ÌOO 


820 

D* = CHR* (4): REM CTRL D 

830 

PRINT D$;"PR#1": REM 
R ON 

PRINTE 

840 

RETURN 


850 

PRINT D*;“PR#0“: REM 
RN TO SCREEN 

RETU 

860 

RETURN 


870 

REM 


880 

REM 



CARS OUT 


890 

REM 



900 

GOSUB 

2000 


910 

PRINT 

n 

"CARS OUT OF THE RACE: 

920 

PRINT 

: INPUT "ENTER LAP 

# F 


OR THIS REPORT “;Y 


930 

N = 1 



940 

PRINT 

: PRINT "ENTER CAR 

#’S 


- ENTER (0) WHEN DONE" 


950 

PRINT 

“POSITION <34 - N); : 


INPUT X 
960 T <N) = X 
970 IF X = O THEN ÌOOO 
980 N = N + 1 
990 GOTO 950 

1000 PRINT : PRINT "LIST COMPLET 
E FOR LAP # 11 ; Y 

1010 PRINT s INPUT “HIT RETURN F 
OR PRINTOUT “;GO* 


1020 

GOSUB 820 


1030 

PRINT "CARS OUT OF RACE ON 


LAP # ";Y;" “ 


1040 

FOR M = 1 TO N 

- 1 

1050 

PRINT "(“;34 - 
" NEXT 

M: “ ) " ; T <M) ; 

1060 

PRINT 


1070 

GOSUB 850: GOTO ÌOO 

1080 

REM 


1090 

REM 



LAP SPEED 


1100 

REM (FOR 2.5 

MILES./LAP) 

ino 

REM 


1120 

GOSUB 2000 


1130 

HTAB 8 


1140 

PRINT "LAP SPEED CALCULATDR 

II 

1150 

PRINT 


1160 

PRINT : INPUT 

S PER LAP "; SEC 

"ENTER SECOND 

1170 

SP = 2.5 * 3600 

/ SEC 

1180 

LET SP = ( INT 

(1000 * (SP 


.005))) / ÌOOO: 

REM ROUND 0 


FF DECIMAL TO 3 

PLACES 

1190 

PRINT : PRINT 

SEC;" SECONDS 


EQUALS ";SP;" 

MPH" 

1200 

PRINT : INPUT 

"ANOTHER CALO 


ULATION (Y/N)"; 

A* 

1210 

IF A* = "Y" THEN 1150 

1220 

GOTO ÌOO 


1230 

REM 


1240 

REM 



CAR it DRIVER DATA 


1250 REM 
1260 REM 
1270 M = 34 
1280 GOSUB 2000 

1290 PRINT TAB( 12)"STARTING LI 
NE-UP" 

1300 PRINT : PRINT “WOULD YOU LI 
KE_" 

1310 PRINT : PRINT "1 - THE DRIV 
ER OF A PARTICULAR CAR" 

1320 PRINT : PRINT “2 - PRINTOUT 
OF THE STARTING LINE-UP" 

1330 PRINT : PRINT "3 - DISPLAY 
STARTING LINE-UP" 

1340 PRINT : PRINT "4 - RETURN T 
O MAIN MENU" 

1350 PRINT : INPUT A 
1360 IF A = 1 THEN 1560 

1370 IF A = 2 THEN 1410 

1380 IF A = 3 THEN 1420 

1390 IF fi - 4 THEN 100 

1400 IF A < 1 OR A > 4 THEN PRINT 
"BETWEEN 1 AND 4. PLEASE": GOTO 
1350 

1410 GOSUB 820: GOSUB 1440: GOSUB 
850: GOTO 1230 

1420 GOSUB 1440: PRINT : INPUT " 

HIT RETURN TO CONTINUE ";GO* 

: GOTO 1230 
1430 REM 
1440 REM 

START FIELD DISPLAY 

Listìng continued. 
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ARD DRIVE $1395. 


5 Megabyte Unit 

Complete with DOS patch for thè Applé'll, and thè IBM'PC 
ALSO AVAILABLE IN A 5 &10 MEGABYTE VERSION 

MICROSCI DISK DRIVES $289. 

Z80 CARD $199. 

MICROMODEM II $299. 

VIDEX 80 COLUMN CARD $249. 
AMDEX COLOR 1 $359. 

VERBATIM SS/DD $25.95 
STAR GEMINI IO $379. 


yy 

VIS A/MAS 


VIS A/MASTERCARD 


P.O. BOX 306 
KEUAH, TEXAS 77565 

or vi alt our showroom at 

162090 Hlekory KnoM Houaton, Taxaa 77059 

1-713-480-6000 

1-800-231-6671 

COMPUKIT 


The Best Products at thè Best Prices. 

Produci Description Retail 

128KDE Soft Disk Includes: 

The Fantastic DISK EMULATOR & VisiCalc Expansion up to 176K $599.00 

64KC RAM CARD includes: 

The Fantastic DISK EMULATOR & VisiCalc Expansion $327.00 

Memory Master Software: 

Software for DOS Relocation in all Legend cards and most 16K $34.95 

RAM cards 

Disk Emulator Software: 

Software for Disk Emulation using one (1) or more 64KC card $34.95 

Pascal Soft Disk Emulator: 

Software used to Emulate Disk Drive in Apple Pascal 1.1. $49.95 

CP/M Fast Disk Software: 

Software used with thè Z-80 cards for thè CP/M operating System $69.95 

SLOT 8, slot expansion: 

Hardware to add one (1) slot to your Apple II $64.95 

Switch: 

Slot 8 extension switch $34.95 

SOFT 8, slot expansion: 

Add one (1) more card and switch with software $84.95 

Pascal Super System: 

Add 6809 speed & 128KDE Pascal Soft Disk $749.00 

Super Emulator, Software: 

Emulate up to 100 tracks & relocate DOS $59.95 

VisiCalc Super System: 

128K RAM card & Videx 80 col. in 1 package $850.00 

Look for These New Products Corning Soon: 

S Card — The FIRST RAM Card to take you from 64K to 1 MEGABYTE. 
18SRC— 18K STATIC RAM card with battery back-up. 

• Disk Emulator is a trademark of Legend Industries, Ltd. and is Patent Pending. 

• Apple II, Apple II Plus, DOS 3.3 and Applesoft Firmware Card are products of Apple 
Computer, Ine. 

• VisiCalc is a product of Visicorp, ine. ||| j 1 'iji||||| Legend Industries, Ltd. 

_ j «v~X |j|| 2220 Scott Lk. Rd. 

iLeUCUÒ -Uubustrics ‘ I * i Pontiac, MI 48054 
^ 1 lì (313) 674-0953 
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FREE SHIPPING 


IBM® Personal Computer Products 

Davong 5 MB Hard Disk System - $1495.00 12 MB - $1995.00 

IBM PC-2 Drive System $ CflLL 

Quadrarti - Quadboard with Parallel 

Port, Serial Port, Clock/Calendar, Expandable to 256K 


64 K on brd. - $425.00 

192 K on brd. - $829.00 

128K on brd. -$530.00 
256K on brd. - $710.00 

r Quadram Memory Expansion 

192K Maximum 


64 K on brd. - $230.00 

192 K on brd -$490.00 

128K on brd. -$350.00 

Amdek Monitore 

Mod 300 Phospbor - $150.00 

Composite Color III - $345.00 

^IBM RGB Compatible Color II - $650.00 

Color 1 - $300.0P| 


IBM/TRS 80 Disk Drlves/Cabinets 

TM 100 Single 40 Track Drive - $189.00 
TM 100-2 Doublé 40 Track Drive - $280.00 
AST MEMORY EXPANSION PRODUCTS $ CALI. 


' Ap ple II® Computer Products 
Syscom Apple Compatitale System... $695 

Apple Compatìble Controller Card.$ 79.95 

Apple Compatible Disk Drive w/Cabinet & Cable. 249.00 

w/Controller. 315.00 

Printer/Graphics Interface. 99.95 

Davong 5 MB Hard Disk System - $1495.00 — 12 MB - $1995.00 
^ Apple Compatible Joysticks. 29.95^ 

Epson/Smith-Corona Printers 

MX80 $425.00 FX80 $550.00 MX100 $840.00 
" TRS 80/Parallel Printer Cable $20.00 

IBM Parallel Printer Cable $35.00 
STAR MICR0NICS SEMINI 10 $ CAU 
GEMINI 15 $ CAU 

Smith Corona TP-1 Letter Quality Daisy Wheel. $575.00 


$1650.00 1 


TRS-80 M0D III Drives w/RS 232 . $1650.00 I 

TRS-80 M0D Ili Disk Controller Incl: Disk Controller. Power- 
^Supply. Mounting Hardware. Cables & Instruction Manuals... $239.00^ 

Dual8” Slim Line-$180.00- Dual 5%" Slim Line—$ 99.00 
Single 5'A" Slim Line - t 09.00 


rtwEi uni 
> AND CABINET» 


VISA, MASTERCARD isioo Min, Add 2 %) 
Or Certified Check 
90 Day Warranty (Parts & Labor) 

TRS 80 is a Registered Trademark, Tandy Corp. 
Prices Subject to Change Without Notice 


DATA—MAI L 

P.O. Box81 8. Reseda. CA91 335 
1-800-635-5555 


FREE SHIPPING IN CONTINENTAL U S. 
(TRS 80 MOD III EXCEPTED) 

(213) 993-4804 

* (IN CALIF.) 
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Listing continued. 


7090 REM 


1450 REM 

1460 FOR I = 1 TO M: FOR J = 1 TO 

3 

1470 READ CA: IF CA = 0 THEN 153 
0 

1490 READ DRIVER»,CARTYPE»,SPEED 

» 

1500 FRINT I;")";" CAR# " ; 

1510 PRINT CA; “ "; DRIVER»;" "; 

CARTYPE»;“ ";SPEED» 

1520 1=1+1: NEXT J: PRINT : PRINT 
:I = I - 1: NEXT I 
1530 RESTORE : RETURN 
1540 REM 

INDIVIDUAL CARS 

1550 REM 
1560 GOSUB 2000 

1570 INPUT "DRIVER FOR WHAT CAR 
# " ; X 

1580 PRINT : PRINT 
1590 FOR I = 1 TO M 
1600 READ CA 
1610 IF CA = O THEN 1710 
1620 READ DRIVER»,CARTYPE»,SPEED 
» 

1630 IF CA < > X THEN 1700 

1640 PRINT "CAR # ":CA;" IS A " ; 
CARTYPE* 

1650 PRINT : PRINT "DRIVER: ";DR 
I VER* 

1660 FRINT : PRINT "QUALIFIED AT 
":SPEED* 

1670 PRINT : PRINT "STARTED IN P 
OSITION # "; I 
1680 PRINT : FRINT 
1690 GOTO 1720 
1700 NEXT I 

1710 PRINT : PRINT "CAR # ";X;" 

IS NOT ENTERED" 

1720 PRINT : INPUT "HIT RETURN T 
0 CONTINUE ";GO* 

1730 RESTORE : GOTO 1230 
2000 REM 

2010 REM CLEAR SCREEN 

2020 REM 

2030 HOME : VTAB 6: RETURN 
7000 REM 
7010 REM 

DATA PROGRAM 

7020 REM 

7030 REM DATA ENTRIES MUST BE E 
NTERED IN PROPER SYNTAX AND 
IN QUALIFYING ORDER 
7040 REM USE FORM OF CAR#,DRIVE 
R, CAR OWNER & TYF'E, QUAL SPE 
ED 

7050 REM THERE IS NO COMMA FOLL 
OWING 'DATA’ — 3 COMMAS SEP 
ARATE THE 4 FIELDS/LINE 
7060 REM STARTING LINEUPS ARE I 
N MOST NEWSPAPERS A DAY OR T 
WO BEFORE THE RACE 
7070 REM CHECK YOUR DATA ENTRIE 
S BY LIST ING ALL CARS TO YOU 
R CRT 

7080 REM THE PROGRAM ALLOWS 33 
DATA ENTRIES PLUS A "DATA O" 
STATEMENT (LINE 8000) 


DATA ENTRIES FOLLOW 


7100 REM 

7110 DATA 1,RICK MEARS,PENSKE-F 
ORD, 207. 004 

7120 DATA 4,KEVIN COGAN,PENSKE- 
FORD,204.082 

7130 DATA 14,A.J. FOYT,MARCH-CO 
SWORTH,203.332 

7140 DATA 40,M. ANDRETTI,WILDCA 
T-COSWORTH,203.172 
7150 DATA 20,G. J OHNCOCK,WILDCA 
T-COSWORTH,201.884 
7160 DATA 94,B. WHITTINGTON,MAR 
CH-COSWORTH,201.658 
7170 DATA 7,T.SNEVA,MARCH-COSWO 
RTH,201.027 

7180 DATA 91,D.WHITTINGTON,MARCH 
-COSWORTH,200.725 
7190 DATA 25,D.ONGAIS,INERSCOPE- 
COSWORTH,199.148 

7200 DATA 3,P.CARTER,MARCH-COSWO 
RTH,198.950 

7210 DATA 12,CHIP GANASSI,WILDCA 
T-COSWORTH.197.704 
7220 DATA 5, J. RUTHERFORD. CHAF'PAR 
AL—COSWORTH,197.066 
7230 DATA 53,DANNY SULLIVAN,MARC 
H COSWORTH,196.292 
7240 DATA 2B.HERM JOHNSON,EAGLE- 
CHEVY,195.929 

7250 DATA 52,HECT0R REBAQUE,MARC 
H—COSWORTH,195.684 
7260 DATA 10,AL UNSER,LONGHORN-C 
OSWORTH,195.567 

7270 DATA 19.B0BBY RAHAL.MARCH-C 
OSWORTH,194.700 

7280 DATA 30.H0WDY HOLMES,MARCH 
-COSWORTH.194.468 
7290 DATA 31,ROGER MEARS,PENSKE- 
COSWORTH,194.154 

7300 DATA 21.GE0FF BRABHAM,MARCH 
-COSWORTH,198.906 
7310 DATA 75,D.FIRESTONE,EAGLE—M 
ILODON,197.217 

7320 DATA 68,MICHAEL CHANDLER,E 
AGLE-CHEVY,198.042 
7330 DATA 95,DALE WHITTINGTON,MA 
RCH—COSWORTH,197.694 
7340 DATA 42,JIM HICKMAN,MARCH-C 
OSWORTH,196.217 

7350 DATA 34,J.PARSONS,MARCH-COS 
WORTH,195.929 

7360 DATA 35,G.SNIDER,MARCH-COSW 
ORTH,195.493 

7370 DATA 16.TONY BETTENHAUSEN, 
MARCH-COSWORTH,195.429 
7380 DATA 69,J.SNEVA,MARCH-COSWO 
RTH,195.270 

7390 DATA 39,CHET FILLIP,EAGLE-C 
OSWORTH,194.879 

7400 DATA 8,GARY BETTENHAUSEN,LI 
GHTNING-OFFY,195.673 
7410 DATA 56,T.BIGELOW,PENSKE—CH 
EVY,194.784 

7420 DATA 66, F’ETE HALSMER, EAGLE- 
CHEVY,194.595 

7430 DATA 55,JOSELE GARZA,MARCH- 
COSWORTH, 194.500 
8000 DATA 0 
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To Do It Right. 

Tb make a Winchester disk for just Apple®!!. 


That’s how we set out to design our hard disk for 
thè Apple®II. To understand thè needs of serious 
users and programmers, and to correct thè errors 
of our predecessors. 

You want user-ffiendliness. So we wrote hard disk 
versions of Apple DOS, CP/M® and Pascal that 
are highly user-friendly and loaded with 
useful features. 

□ Auto-boot hard disk 

□ Menu-driven Utilities 

□ Single-keystroke program execution in DOS 

□ Disk search with wild cards, and many more 

You want flexibility. So we made every 
feature variable. 

□ From 1 to 16 operating Systems on each disk 

□ Operating System spaces grow as needed 

□ Slot independence 

□ Variable size volumes (to 400K in DOS) 

□ Mountable and unmountable volumes (even in CP/M) 

□ Custom DOS allowed 

You want reliability. We use thè leading drive. 
And Corona’s unique data protection technology. 

□ DataGuard™ 32-bit error correction code 

□ FailSafe” read-after-write and automatic bad-sector reallocation 

□ 2-level impact-protection packaging 


You want low-cost backup. So we wrote backup 
Utilities that make floppy backup convenient. 

□ File compacting to reduce thè number of floppies 

□ Volume selective backup in all operating systems 

□ Automatic diskette sequencing to ease floppy handling 

You want compatibility. We maximize compati- 
bility with existing software and peripheral cards. 

□ 9K interface card leaves main memory untouched 

□ Interrupts are allowed 

□ Boot protected floppies from slot 6 without removing hard disk 

□ Automatic slot/drive to hard disk remapping 

And you want supporr. We do that right too. 

□ Hardware depot Service in every region 

□ Software theft-protection on thè hard disk 

Compare thè features that matter to you. 

And visit our locai dealer or distributor for 
a demonstration. You’ll see thè difference 
specialization makes. 


Corona Starfire™— The Winchester Disk for Apple II 

S2495 / 5 MB «2995 / 10 MB 

(All software included. Pascal not needed for CP/M.) 

Now $2195 Now $2695 


* corona. 

The Third Generation Microcomputer Company 


Corona Data Systems • 31324 Via Colinas, Section 110, Westlake Village, CA 91361 • 213-706-1505 
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Lightning Fast Apple Programs! 





With MacroSoft. 


Get Machine Language specds for your Apple Games, Sorts, 
Utilities, Home programs, Number Crunching, and virtually every- 
thing else yóu program ... Without having to program in Machine 
Language. 

Typical speed improvements for your programs vvill range be- 
tween 2 and 25 times faster than Applesoft! MacroSoft is even faster 
than Compì ler-generated programs! Up to 10 times faster. 


ASSEMBLER, which just happens to he thè best Apple Assembler on 
thè market. When you buv MacroSoft + THE ASSEMBLER you get 
a 100+ page User Guide for THE ASSEMBLER and a 50+ page 
User Guide for MacroSoft. 

MacroSoft and THE ASSEMBLER are an unbeatable team! For 
a limited time, you can get both for $99.95. That's a saving of $20.00 
over thè indiv iduai purchase prices. 


MacroSoft 

Compiled 

Applesoft 

Applesoft 



PROGRAM PERFORMANCE (relative to Applesoft) 


MacroSoft is not a compiler. lt is an Applesoft-like language 
that Works with THE ASSEMBLER by Micro-SPARC to let you 
urite programs that are converted directly into stand-alone Machine 
Language programs. 

And MacroSoft adds a lot of programming 
goodies that were left out of Applesoft. Fea- 
tures like: HSCRN, HFIND, IF-THEN-ELSE, 

REPEAT-UNTIL, WH1LE-WHILEN, BUT- 
TOX, SOUND. PAUSE and more will make 
your life and your programming a vvhole lot 
simpler ... and muCh much faster. 

We’re betting that once you’ve tried 
MACROSOFT and THE ASSEMBLER you 
won't be satisfied with anything less ... ever 
again. 

Incidentally MacroSoft uses THE 


MACROSOFT and THE ASSEMBLER are available from your 
locai Apple dealer. If he does not yet stock them, add $1.50 shipping/ 
handling and send your order to Micro-SPARC Ine., Systems Di Vision, 
P.O. Box 639, Lincoln, MA 01773. (617) 259- 
9710. (MA resident add 5"<> sales tax). Wc ac- 
cept Visa and MasterCard. 

MacroSoft requires an Apple li with 
Applesoft in ROM or an Apple 11 Plus with 48K 
memory, a disk, DOS 3.3, and THE 
ASSEMBLER. 

Apple is a registered trademark of Apple 
Computer Co. 
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Logo 


Solving Problems 
With Logo 

-Part II- 


Here's your chance to put what 
you learned last month to practical 
use. Logo is not just for kids! 


by Greg Stone 


Program listing. Average.sort , an averaging and sorting routine. 


TO AVERAGE.SQRT 
SET.START 
INSTRUCT1ONS 
DO.WORK 
NEW.DRDER 
END 


TO SET.START 
MAKE ”L.ID C! 
MAKE "L.AVG C! 
MAKE "L.50RT C! 
MAKE "CNT.2 1 
MAKE "ID O 
END 


TO INSTRUCTIONS 
PRINT CI 
PRINT C! 

PRINT CTHIS PROGRAM TAKES A LIST OF SCORES,3 
PRINT CTHEN PRINTS THE PERSDN'S NAME OR3 
PRINT CNUMBER, ALL THE SCORES, THE TOTALI 
PRINT CSCORE, AND AVERAGE SCORE. AFTER THIS! 
PRINT CIS DONE FOR EACH INDIVIDUAL, THE LISTI 
PRINT CIS SORTED FROM HIGN TO LOW AND THE! 

PRINT CRANK, AVERAGE, AND IDENITIFICATION AREI 
PRINT CPRINTED IN A NEW LIST.I 
PRINT C3 

PRINT CWHEN ALL NAMES AND SCORES HAVE BEENI 
PRINT CENTERED, TYPE "X" WHEN PRDMPTED FORI 
PRINT tCANDÌDATE'S NAME OR NUMBER TO SIGNAL! 
PRINT CTHE SDRT ROUTINE.! 

PRINT CI 

PRINT CPRINTER MUST BE TURNED ON TO RUN THISI 
PRINT CPROGRAM.! 

PRINT CI 

PRINT l- ------------------ -1 

END 

TO DO.WORK 
GET.INFO 

IF :ID = CX3 CSTOPI 

AVERAGE 

ROUND.100 

DISPLAY 

STORE 

DO.WORK 

END 


TO GET.INFO 

PRINT CWHAT IS CANDIDATE'S IDENTIFICATION! 

PRINT CNAME OR NUMBER ?! 

MAKE ”ID READLIST 

IF :ID = CXI [STOP3 

PRINT CWHAT ARE THE SCORES?! 

MAKE "SCR READLIST 
END 

Listing continued. 


H ow do you total, average and 
sort thè scores of dozens of job 
candidates? One way is with a calcu- 
lator and paper. But this can be a 
laborious process with many opportu¬ 
ni ties for error. The computer can 
eliminate much of thè labor, reduce 
thè chances for error, and provide 
printouts. Besides, it provides a perfect 
opportunity to try out thè Logo Bub- 
ble.sort routine, described last month, 
on a reai project. 

In addition, tackling this project 
will develop a few Apple Logo pro- 
cedures you might want to make part 
o£ your library eyen if you don’t need 
thè whole program. One of thè bonus- 
es of breaking thè program into a col- 
lection of brief procedute is that each 
of these form indepèndent units that 
can have many other application. 

The total program (see listing) 
should serve as a guide for creating 
similar applications, such as a teacher’s 
gradebook. 

Heres what we start with: 

1. Forty candidates for an impor- 
tant position. 

2. Each candidate is reviewed by 
each member of a 19-person commit- 
tee and ranked on a scale of 0-5. 

3. Candidates are identified only by 
a code number. 


Address correspondence to Greg Stone,1346 Drift 
Road, Westport, MA 02790. 
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Listing continued. 


TO AVERAGE 

MAKE "CNT <COUNT :8CR) 
MAKE "TOTL ADD :SCR 
MAKE "AVG ITOTL / ; CNT 
END 


TO ROUND.100 

MAKE " AVB IAVG # 100 

MAKE "AVG ROUND :AVG 

MAKE "AVG :AVG / 100 

END 


TO ADD :X 

IF : X - t D CQUTPUT 03 

OUTPUT BUM FIRST I X ADD BUTFIRST :X 

END 


TO DISPLAY 
.PRINTER 9 

TYPE ■ :ID TAB'TYPE :SCR TAB TAB TYPE :TOTL TAB PRINT :AVG 
PRINT CD 

PRINT C---3 

.PRINTER O 
END 


TO TAB 

TYPE CHAR 32 

IF (REMAINDER FIRST CURSOR 8) > O CTAB3 
END 


TO STORE 

MAKE "L.ID LPUT : ID SL. ID 
MAKE "L.AVG LPUT :AVG IL.AVG 
MAKE "L.SORT LPUT !AVG IL.SORT 
END 


TO NEW.ORDER 

MAKE "L.SORT LPUT -99999 :L.SORT 

SORT 

HEAD 

COMPARE 

END 


TO SORT 

MAKE "CNT.1 0 

TRY 

MAKE "L.SORT SENTENCE (BUTFIRST !L.SORT) (ITEM 1 :L.SORT) 

IF ICNT.1 > 0 CSORT3 

END 


TO TRY 

TEST ITEM 1 :L.SORT < ITEM 2 :L.SORT 
IFTRUE CEXCHANGER3 

IFFALSE CMAKE "L.SORT SENTENCE (BUTFIRST :L.SORT) (ITEM 1 :L.SORT)3 

IF ITEM 1 IL.SORT > -99999 CTRY3 

END 


TO EXCHANGER . 

MAKE "L.BORT (SENTENCE (ITEM 1 IL.SORT) (BUTFIRST BUTFIRST IL.SORT) (ITEM 2 IL.SORT) 
MAKE "CNT.1 ICNT.1 + 1 
END 


TO HEAD 
.PRINTER 9 
PRINT CD 

PRINT C----3 

TYPE CRANK3 TAB TYPE CAVGD TAB PR CID3 
PRINT C 3 
.PRINTER 0 
END 


TO COMPARE 

IF IL.AVG = CD CSTOPD 

TEST FIRST IL.SORT = FIRST IL.AVG 

IFTRUE LDISPLAY.2 NEXT.TRY COMPARE! 

IFFALSE CFL1P COMPARE3 

END 


TO FLIP 

MAKE "L.ID LPUT FIRST IL.ID IL.ID 

MAKE "L.ID BUTFIRST IL.ID 

MAKE "L.AVG LPUT FIRST IL.AVG IL.AVG 

MAKE "L.AVG BUTFIRST IL.AVG 

END 


TO DISPLAY.2 
.PRINTER 9 

TYPE ICNT.2 TAB TYPE FIRST IL.SORT TAB PRINT FIRST IL.ID 

-PRINTER 0 

END 


TO NEXT.TRY 

MAKE "CNT.2 lCNT.2 + 1 
MAKE "L.ID BUTFIRST IL.ID 
MAKE “L.AVG BUTFIRST IL.AVG 
MAKE "L.SORT BUTFIRST IL.SORT 
END 

Lifting continued. 
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Here’s what we want: 

1. A printed sheet which shows each' 
candidate’s name or number, thè 
scores he or she received from each 
committee member, thè total score, 
and thè average score rounded to thè 
nearest hundredth. 

2. A summary ranking by highest 
score showing thè ranking, thè average 
score (rounded to thè hundredths 
place), and thè candidate’s identifica- 
tion number. 

The program Average.sort gets us 
from here to there by way of 20 proce- 
dures, three of which you’ll recognize 
as being thè heart of last month’s sort 
routine. 

TO AVERAGE.SORT 
SET.START 
INSTRUCTIONS 
DO.WORK 
NEW.ORDER 
END 

Average.sort is also thè name of thè 
main procedure and it starts with a 
couple of self-explanatory routines. 
The first, Set.start, zeros a few vari- 
ables and provides some empty lists 
we’ll fili later, The next, Instructions, 
prints directions for thè user. (This 
may seem like an unnecessary typing 
exercise especially if you will be thè 
person using thè program. However, I 
find that I have a remarkable capacity 
for forgetting a program once it’s been 
on a disk a few weeks without use, so a 
little time spent now saves frustration 
later.) 

The third and fourth procedures 
called by Average.sort are Do.work 
and New.order. They are thè main 
subdivisions of thè program. Do.work 
gets thè numbers, adds and averages 
them, prints out thè results, and Stores 
them for sorting. New.order does thè 
actual sorting and prints out a sum¬ 
mary, sorted result. 

TO DO.WORK 

GET.INFO 

IF :ID = [X] [STOP] 

AVERAGE 

ROUND. 100 

DISPLAY 

STORE 

DO.WORK 

END 

Let’s walk through Do.work then, 
seeing exactly what each procedure 
does. The first procedure called is 
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Listing continued. 
7AVERABE.SORT 


THIS PROGRAM TAKES A LIST OF SCORES, 
THEN PRINTS THE PERSON’S NAME OR 
NUMBER, ALL THE SCORES, THE TOTAL 
SCORE, AND AVERAGE SCORE. AFTER THIS 
IS DONE FOR EACH INDIVIDUAL, THE LIST 
IS SORTED FROM HIGN TO LOW AND THE 
RANK, AVERAGE, AND IDENITIFICATION ARE 
PRINTED IN A NEW LIST. 


WHEN ALL NAMES AND SCORES NAVE BEEN 
ENTERED, TYPE -X" WHEN PROMPTED FOR 
CANDIDATE* S NAME OR NUMBER TO SISNAL 
THE SORT ROUTINE. 


PRINTER MUST BE TURNED GN TO RUN THIS 
PROGRAM. 


WHAT IS CANDÌDATE*S IDENTIFICATION 
NAME OR NUMBER ? 

STONE,GREG 

WHAT ARE THE SCORES? 

1 234367890-10 


STONE,GREG 

1 2 3 

4 5 

6 

7 

8 

9 O -IO 

35 

3. 18 

ROGER.JONES 

0 9 8 

7 6 

5 

4 

3 

2 10 9 

54 

4.5 


1,234 12 123 1245 9876 -4500 987654321 6801 483.79 


RANK AVE ID 

J 485.79 1,234 

2 4.5 ROGER.JONES 

3 3.18 STONE,GREG 


Get.info, which, not too surprisingly, 
collects thè necessary informatimi 
from thè user. 

Incidentally, someone once com¬ 
piamoci that he couldn’t understand 
why Apple Logo has no provision for 
remarks. Remarks are useful, but in 
Logo thè trick is to keep procedures 
short and their names as descriptive as 
possible. The same can be said for vari- 
ables. A little time spent trying to give 
procedures and variables descriptive 
(but brief) names will save hours when 
two months later you come back to 
your program and try to figure out 
what it does and why. 

TO GET.INFO 

PRINT [WHAT IS CANDIDATE’S IDEN¬ 
TIFICATION] 

PRINT [NAME OR NUMBER ?] 

MAKE “ID RE AD LIST 
IF :ID = [X][STOP) 

PRINT [WHAT ARE THE SCORES?] 

MAKE “SCR READLIST 
END 

The purpose of Get.info is to have 
thè user input for each candidate first a 
name or number, and then thè list of 
votes. The print statements just pro¬ 
vide a prompt for thè user and thè 
Ijogo primitive Readlist collects thè in- 
formation entered and saves it as a list. 

Get.info also contains thè stop code 
X. If this is entered thè procedure stops 
and control is retumed to thè calling 
procedure, Do.work. If you had 
entered this stop code it would mean 
you were ready to move directly to thè 
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sorting section of thè program, so thè 
same stop code is repeated in Do.work. 
(If it wasn’t included in Do.work that 
procedure would go indefinitely.) 

But that’s getting ahead of thè pro- 
cess. Let’s assume we have not entered 
a stop code, but some valid data. 
Get.info gives us a candidate’s Identifi¬ 
cation number held in thè variable ID, 
and all of thè scores (or votes, if you 
like) held in thè variable SCR. Once we 
have these, control moves to thè next 
procedure in Do.work, Average. 

TO AVERAGE 

MAKE “CNT (COUNT :SCR) 

MAKE “TOTL ADD :SCR 
MAKE “AVG :TOTL / :CNT 
END 

Average does threethings. Usingthe 
primitive Count, it notes thè number 
of items in thè list SCR, adds up thè list 
and Stores thè result in thè variable 
TOTL, and it divides thè total by thè 
count of thè list to get an average. In 
doing this it calls another useful little 
procedure that could be used to give 
you a total for any list of numbers, Add. 

TO ADD :X 

IF iX *= [ ] [OUTPUT 0] 

OUTPUT SUM FIRST :X ADD BUTFIRST :X 
END 

The Logo primitive Sum will take a 
variable number of inputs and add 
them, but it can’t handle a list. If you 
said SUM :SCR, it would reply with thè 
error message SUM DOESN'T LIKE [12 3] 
AS AN INPUT. (Of course this message 


would vary with thè content of thè 
list.) The problemi then is how to get 
thè numbers out of thè list so Sum can 
do its work. The path chosen here is a 
recursive procedure that keeps pull- 
ing thè first number out of thè list to 
use with Sum, and then shortening thè 
list by using all but thè first number 
next time. 

The first line in Add completes thè 
process by allowing Sum to have an in¬ 
put, 0, even when thè list is empty. 
When this business is completed thè 
Output command hands thè result 
back to thè procedure that asked for it, 
Average, where it is saved under thè 
variable, TOTL. 

There is one minor concern to ad- 
dress. Average tends to carry a number 
out several more decimai places than 
needed, so a procedure is included to 
round to thè hundredths’ place. Logo 
has a primitive. Round, which rounds 
any number to thè nearest integer. 

TO ROUND. 100 
MAKE “AVE :AVG * 100 
MAKE “AVE ROUND :AVC 
MAKE “AVG :AVG / 100 
END 

Round. 100 is easiest to understand 
by watching what it does to a number. 
When you’re developing or trying to 
understand Logo procedures it’s fre- 
quently helpful to modify them by in- 
troducing print statements at key 
points. To see Round. 100 at work add 
Print :avg after each line, then at com¬ 
mand level type this: 

MAKE "AVG 3.52447 

Then ask for ROUND. 100 and you will 
see this: 

352.447 

353 

3.53 

Why? Because thè first line takes 
:AVG (3.52477) and multiplies it by 
100 (352.477). The next line rounds 
this to thè nearest integer (353), and 
thè last line divides it by 100 (3.53). 

Obviously it would be equally easy 
to round to thè tenths or thousandths 
place and I suggest you write proce¬ 
dures for all three and stare them on a 
Logo library disk. 

Now back to thè reai business at 
hand. When Get.info, Average, and 
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Round. 100 have completed their work 
we have four useful pieces of informa- 
tion stored in free variables for display 
to draw upon. 

TO DISPLAY 
.PRINTER 9 • 

TYPE :ID TAB TYPE :SCR TAB TAB TYPE 

:TOTL TAB PRINT :AVG 
PRINT [ ] 

PRINT [-] 

PRINTER 0 
END 

Display turns on thè printer and 
types out thè candidate’s Identification 
number, thè scores, thè total and thè 
average. The last line turns off thè 
printer. Waming: If you have no 
printer, take these printer commands, 
and thè one in Display.2 out of thè 
program. Logo will crash if there is no 
printer plugged into thè designated 
slot number. (We specify Slot 9 here 
because this copies text to thè screen 
while it is being printed out. When 
Logo sees thè 9, it subtracts 8 to find 
thè printer slot. We are assuming here 
that thè printer is in Slot 1.) 

With thè printing of thè first line 
we’ve completed our first task. All that 
is required is to make Do.work recur- 
sive so it repeats thè process for each 
candidate. If you have sharp eyes, 
however, you’ve noticed two things. 
There’s a word in Display, Tab, which 
is not a Logo primitive. There’s also one 
more procedure in Do.work, Store. 
Tab can be found in thè Apple Logo 
Reference Marmai. Tab stops are lo- 
cated in every eighth column and it 
“tabs” over to thè next tab stop. Store is 
more important. It provides thè transi- 
tion to thè next section of thè program. 
Before you get into it you might want 
to review what we’ve done so far. 

The basic problem Store addresses is 
how to keep a candidate’s identifica- 
tion number (or name) and average as- 
sociated while sorting is done so that 
they can be linked when thè sort is fin- 
ished. One solution is to create parallel 
lists, then put thè informaton to be 
sorted in a third list. That’s thè process 
used here. 

TO STORE 

MAKE “L.ID LPUT :ID :L.ID 
MAKE “L.AVG LPUT :AVG :L.AVG 
MAKE “L.SORT LPUT :AVG :L.SORT 
END 
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Here’s where thè LPUT command 
really gets a workout. LPUT puts thè 
object it works on at thè end of a list. In 
Store thè important point is it’s creat- 
ing two paraUel lists, one containing 
thè candidate’s name or number, and 
thè other thè average score for that 
candidate. Each time Store is called a 
new identification and average get 
placed at thè end of their respective 
lists. The second important thing hap¬ 
pening here is thè same averages are 
also being saved in a third list (L.sort), 
which will be sorted. 

When thè first candidate’s name 
and score are thus neatly stored, thè 
procedure Do.work calls itself and 
goes back and gets thè information 
about thè next candidate. It calculates 
a total and average, prints out thè can¬ 
didate’s number, thè scores, total and 
average, and then Stores thè essential 
items. This recursion goes on until it 
sees thè stop code, X. 

When that happens, any time Stop 


is encountered, control is retumed to 
thè program that called it. In this case, 
Do.work was called by thè main pro¬ 
cedure, Average.list, so we go back 
there and find we are at thè last line. 
(The program picks up where it left 
off.) So Average.list calls New.order, 
which gets thè sorting done and prints 
thè results. 

TO NEW.ORDER 

MARE “L.SORT LPUT -99999 :L.SORT 

SORT 

HEAD 

COMPARE 

END 

In last month’s Bubble.sort we in- 
structed thè user to introduce a stop 
code. Here that stop code is introduced 
by thè first line of New.order, which 
makes -99999 thè last number in thè 
list L.sort. (It’s minus 99999 because 
thè sort routine has been altered slight- 
ly to sort from highest to lowest rather 
than lowest to highest.) 


The next line calls Sort. These pro- 
cedures are taken straight from last 
month’s program, so we won’t exam- 
ine them here. You will find that 
names of variables have been changed 
to conform with this program, so if you 
have thè program saved you’ll want to 
make those changes in it. Also check 
signs on stop codes and thè “greater 
than” and “less than” symbols to make 
sure they conform with thè program. 

If you are going to enter this pro¬ 
gram, thè easiest way to start is to first 
load Bubble.sort (assuming you have 
it), then erase all except Sort, Try and 
Exchanger from your workspace. Now 
edit these three to conform with what 
is published this month, then type in 
thè rest of this program. Save thè en- 
tire workspace under thè heading Av¬ 
erage. sort, or whatever name will help 
you remember what it does. 

When Sort finishes its work, control 
returns to New.order which calls 
Head. All this docs is provide a cosmet- 
ic heading for thè printout to follow 
and is self-explanatory. 

TO HEAD 
.PRINTER 9 
PRINT [ ] 

PRINT [-] 

TYPE [RANK] TAB TYPE [AVG] TAB PR [ID] 
PRINT [ ] 

.PRINTER 0 
END 

This and thè other printing routines 
(Display, and Display. 2) do illustrate 
thè difference between thè Logo prim- 
itives Type and Print. These both print 
what follows, but Print is followed by 
an automatic carriage return while 
Type lets you stay on thè same line. 

The next procedure New.order 
calls is Compare, which compares thè 
sorted list with thè two parallel lists 
of averages and identification creat- 
ed in Store. 

TO COMPARE 
IF :L.AVC = [ ] [STOP] 

TEST FIRST :L.SORT = FIRST :L.AVG 
IPTRUE [DISPLAY. 2 NEXT.TRY COMPARE] 
IFFALSE [FLIP COMPARE] 

END 

The first line stops thè program once 
thè lists are empty. The next line is thè 
heart of thè process. It runs a test to see 
if thè first number in thè sorted list is 
thè same as thè first number in thè list 
of averages. If this test proves false, 
then Flip is called. 
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"That's it— perhaps a little complex in its entirety, 
but simple in any given procedure." 


TO FLIP 

MAKE “L.ID LPUT FIRST :L.ID :L.ID 
MAKE “L.ID BUTFIRST :L.ID 
MAKE “L.AVG LPUT FIRST :L.AVG :L.AVG 
MAKE “L.AVG BUTFIRST :L.AVG 
END 

Flip works on thè parallel lists con- 
taining thè name (or number) and thè 
averages. It “flips” a copy of thè first 
item in each list to thè end of its respec- 
tive list using LPUT. If you let it stop 
there, however, you would simply 
have thè same content at thè start and 
finish of each list, so you have to create 
a new list that is thè Butfirst of thè old 
list (all but thè first item of thè old list). 

Control then returns to Compare. 
(This is accomplished by thè second in- 
struction under IFFALSE in Compare.) 
All that happened is that thè first 
item has been moved to thè back of thè 
bus in thè parallel lists so we can now 
compare thè first item in thè sorted list 
of averages with what was original- 
ly thè second item in thè originai 
list of averages. The parallel lists 
keep scrolling forward in this man- 
ner until a match is found; when that 
happens thè instruetions under IF 
TRUE are carried out. 

The first of these prints out thè result 
through thè straightforward Display.2. 

TO DISPLAY.2 
.PRINTER 9 

TYPE :CNT.2 TAB TYPE FIRST :L.SORT 

TAB PRINT FIRST :L.ID 
.PRINTER 0 
END 

It first prints a rank with CNT.2. 
(Set.start sets this counter at 1 at thè 
beginning of thè program.) The next 
thing it asks for is thè first item in thè 
sorted list. Since thè list is sorted high- 
to-low this will be thè highest score, But 
who does it belong to? Since thè list con- 
taining thè names (or numbers of can- 
didates has been moving on a parallel 
track with thè originai list of averages, 
all we need is thè first item of L.ID. 

At work this process might look like 
this: 

Three lists when sorting is finished: 

L.ID Kaput Smith Jones 

••L.AVG 23.55 25.09 50.25 

;L.SORT 50.25 25.09 23.55 


L.AVG 25.09 50.25 23.55 

L.SORT 50.25 25.09 23.55 

After second test in Compare proves false: 
:L.ID Jones Kaput Smith 

L.AVG 50.25 23.55 25.09 

L.SORT 50.25 25.09 23.55 

Now there’s a numerical match be- 
tween thè FIRST :L.SORT and FIRST 
L.AVG, so Display.2 prints: 

1 50.25 Jones 

Obviously, that doesn’t finish thè 
job. Note that in Compare if some- 
thing is true, thè procedure Next.try is 
called before going back to Compare 
once more. 

TO NEXT.TRY 

MAKE “CNT.2 :CNT.2 + I 

MAKE “L.ID BUTFIRST :L.ID 

MAKE “L.AVG BUTFIRST :L.AVG 

MAKE “L.SORT BUTFIRST :L.SORT 

END 


Since Next.try will be called only 
when a match is found and after it is 
printed, thè first thing to do is incre- 
ment thè counter that keeps track of 
thè ranking. The next three lines take 
each of our lists and chop off thè first 
item. By dropping items like this after 
they have been printed, we avoid thè 
problem of identical scores. (If this 
weren’t done, identical scores would 
all go to thè credit of thè first person 
whose name was associated with thè 
score.) 

That’s it—perhaps a little complex 
in its entirety, but simple in any given 
procedure. Of course thè program has 
its limitations. You may get an “out of 
space” message in Logo if you put 
more than 25 scores in for a single can¬ 
didate. Similarly, as noted last month, 
thè bubble sorting routine is relatively 
slow, so if you have more than 40 can- 
didates, it’s best to use some other pro¬ 
gram. Within these limitations it 
should function fine. ■ 


Circle 72 on Reader Service card. 


NOW YOLJ CAN AEEORD I IH BEST 
WORD PROCESSINO SYSTEM 


FORMAT H* and 

Combine to give you POWER and EASE OF USE _ , fcOJQQ 

at an affordable special system price.VNL¥ 


VIEWMÀX80* 

’ AP ■ lOE É — 


roRMAT n • Displays text on thè screen exactly as 
it will print out. • Performs virtually any editing or formatting task. 

• Common sanse, single key stroke, commands simplify learning and use. 
"D" for delete, "E" for edit, "I" for insert, "J" for justify, etc. 

• Supports virtually all printers. • Boldface, proportional spacing, 
superscripting, etc. are all available. • Includer a sophisticated mailing 
list that allows names and addresses to be used selectively in documents 
or on labels. • Format II islightning fast and menu driven. 

VIEWMAX 80 "THE OTHER" 80 C0LUMN TEXT CARD 

• Clear, crisp characters with true decenders (7X9 dot matrix) 

• Supports ESCAPE cursor editing. • Soft 40/80 Video Switch. 

• Shift key support. • Inverse video character generator. 

• Full 2 year parts and labor warranty. • Very easy, foolproof 
installation. • Functionally compatire with Videx Videoterm.* 


SPECIAL PACKAGE PRICE only $209 
CALLI 800 821 6154 SKTco 


•TRADEMARKS 0F KENSINGT0N MICR0WARE. MICR0MAX and VIDEX C0RP. 

May 1983 Èider 89 


After first test in Compare proves false: 
L.ID Smith Jones Kaput 








Hardware 


EPROM 

Edification 

Part II 


Here's thè program you've been waiting for. 
Now you can read EPROMs into Apple memory, 
so copies are yours when needed. 


by Joe Magee 


I n March I presented an EPROM 
programmer that could do only 
one thing: program a 2516-type 
EPROM. This month, I describe a 
few simple additions that will allow 
reading (and thus copying) an 
EPROM as well as programming. 
Also, thè software from thè last article 
has been updated to handle thè read 
function and is presented here (see thè 
program listing). 

The hardware modifications con- 
sist of adding 3 ICs (U7, U8, and U9). 
U7, a 74LS08, is used to improve 
resetting thè programmer. The 
originai hardware had no power-on- 
reset capability; thè only way to en- 
sure that thè power to thè EPROM 
Socket was off was to issue a reset from 
software. The new scheme will reset 
thè programmer any time thè Apple is 
reset, as well as from within thè 
program. 

In Part 1, five of thè eight possible 
decodes from U3 were used. To im- 
plement thè read capability, thè last 
three decodes are used. 

Function 6, address 5, is used to 
toggle between thè PROM write and 
read condition. When reset occurs, 
thè programmer is put in thè program 
mode. When toggled into thè read 


Address correspondence to Joe Magee, PO Box 
614337, Irving, TX 75061. 

90 èider May 1983 






Listing. Updated EPROM programmer driver. 





1000 
1010 

* 

* EPROM PROGRAMMER 

DRIVER 





1020 

* 







1030 

* THIS 

PROGRAM IS TO DRIVE THE UPDATED EPROM 





1040 

* PROGRAMMER. IT WILL READ AS WELL AS PROGRAM 





1050 

* EPROMS. IT FUNCTIONS WITH ONLY TMS 251& TYPE EPROMS. 





1060 

* 







1070 

* JOE 

"IACEE 






1080 

* P. 0 

BOX 614337 






1090 

* IRVING, TEXAS 750 

61 

COSO- 




1110 

RESET 

.EQ «COSO 

RESET PROGRAMMER 

COSI- 




1120 

BMPADR 

.EQ «COSI 

BUMP ROM ADR 

C082- 




1130 

RELAY 

.EQ «C082 

TOGGLE RELAY 

C083- 




1140 

PGM 

.EQ «C083 

TOGGLE PGM FIN 

C084- 




1150 

DATA 

.EQ «C084 

STORE DATA IN LATCH 

C0S5- 




1160 

RDENBL 

.EQ «C085 

ENABLE READ FUNCTION 

C086- 




1170 

WRENBL 

.EQ «C036 

ENABLE URITE FUNCTION 

C087- 




1180 

PRMDAT 

.EQ «C087 

READ EPROM DATA 

FDFO— 




1190 

COLITI 

.EQ «FDFO 

CHAR TO SCREEN ROUTINE 

FF69- 




1200 

MONITR 

•EQ «FF69 

MONITOR RETURN POI NT 

FC58- 




1210 

CLEAR 

.EQ «FC58 

CLEAR SCREEN ROUTINE 

FDOC- 




1220 

RDKEY 

.EQ «FDOC 

GET KEY STROFE 

FDDA- 




1230 

PRBYTE 

.EQ «FDDA 

PRINT ACCUMULATOR IN HEX 

OOOD— 




1240 

CR 

.EQ «OD 

ASCII CARRIAGE RETURN 

0003- 




1250 

ETX 

.EQ «03 

ASCII END OF TX 

0007- 




1260 

BELL 

.EQ $07 

ASCII BELL 

0031- 




1270 

ONE 

.EQ «31 

ASCII ONE 

0032- 




1280 

TWO 

.EQ «32 

ASCII TUO 

0033— 




1290 

THREE 

.EQ «33 

ASCII THREE 

0000- 




1300 

PRTPTR 

.EQ «00 

PRINT STRINO POINTER 

0002- 




1310 

BUFFER 

.EQ «02 

POINTER TO MEM BUFFER 

0004- 




1320 

SLOT 

.EQ «04 

SLOT NIJMBER 

0005- 




1330 

COUNT 

.EQ «05 

DELAY COUNT 

1010- 




1340 

SCASMB 

.EQ «1010 

ENTRY POINT FOR SC ASSEMBLER 





1350 


.OR «8000 

START LOG 





1360 


.TF NEUPR0M0BJ2 

8000- 




1370 

START 

.EQ * 

START OF PROGRAMMER 

8000- 

20 

42 

81 

1380 


JSR BANNER 

PRINT SCREEN HEADING 

8003- 

AD 

67 

81 

1390 


LDA GETSLT 

MESSAGE ADR HI 

8006- 

85 

00 


1400 


STA PRTPTR 

SAVE 

8008- 

AD 

68 

81 

1410 


LDA GETSLT+1 

MESSAGE ADR LO 

800B- 

88 

01 


1420 


STA PRTPTR+1 

SAVE 

800D- 

20 

14 

81 

1430 


JSR PRINT 

PRINT MESSAGE 

8010- 

20 

OC 

FD 

1440 


JSR RDKEY 

GET INPUT DATA 

8013- 

20 

FO 

FD 

1450 


JSR COUT 1 

ECHO IT 

8016- 

29 

7F 


1460 


AND #$7F 

MASK OFF MSB 








Listing continued. 
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MfìCROT€CH Computer Products Ltd. 



UNIVERSAL SOLUTIONS TO UNIVERSAL PROBLEMS 


How often have you run out of memory - just when you could least 
afford it? Now there's a ready solution with a full range of Macromem 
memory boards (*1), for thè Apple II (*2), from thè supplier of thè 
WIDEST RANGE of MEMORY BOARDS for thè APPLE COMPUTER! 

Let our Distribution division quote on Saturn, Prometheus or other 
memory boards, or other produets for Apple or I.B.M. (* 7 ), in addition 
to our own! 

128K-64K-32K-16k MACROMEM - 3 

Normaily shipped as 128K. Also available as 32K or 64K expandable to 
1 28K. Supplied with MACRODISK software for DOS 3.3 (*2), PASCAL 
(*2,*6), and CP/’M (*3), effectively turning your board into a second 
disk drive, as well as DOS-relocating software. Powerful tool for word 
processing! Pascal users can store thè operating system, Editor, Filer or 
Assembler in thè RAM-DISK for high speed, quiet operation. The board 
that teils you its READ or WRITE and BANK status. VisiCalc (*4), in¬ 
terface available for utilising thè full board. Runs software developed for 
Prometheus Products or Legend Industries boards. NO CABLE! 

32k $299. 64k - $399. 128k $499. 

32K MACROMEM-2 

Cost effective for VisiCalc. Users will find this board a must together 
with VC-EXPAND and VC-EXPAND 80 ('5) - virtually DOUBLES thè 
usable array size. Supplied with MACRODISK and other software to 
free ram memory. 

$199. Standard $269. with VisiCalc interface. 

16K MACROMEM-1 

Used as language card by Pascal, CP/M and thè many other software 
packages requiring a 16K card. Specially designed for low-noise reiiable 
operation. 

$139. with MACRODISK (*1), RAM Diagnostics, graphics demo etc. 
software. $99. without software. 


64K - 128K DISKULATOR (*1) 

Why limit yourself? Buy thè DISKU LATOR and run software developed 
for OTHER MANUFACTURERS' memory boards (eg Saturn Systems, 
Prometheus or Legend Industries). Simple strap options for emulating 
thè different bank selecting standards. Supplied with MACRODISK for 
DOS 3.3, PASCAL, and CP/M. 

MACRODISK SOFTWARE (compatible with most manufacturers' 
memory cards) available separately. 

GRAPHICS GALORE WITH MACROPRINT (*1) 

NEW ENHANCED GRAPHICS with scaling from 1 to 6 times size, side- 
by-side printing, rotation, inversion etc. plus many formatting com- 
mands optimised to each printer. Dump Hi-Res or Lo-Res page or read 
ext. keyboard. A versatile paraiIel interface board with input and out¬ 
put channels, allowing reading of an 8-bit INPUT as well as use as 
printer interface, thè EPROM can be replaced by a RAM chip for easy 
design of custom drivers. The BEST choice in printer interfaces. 

SI 29. 

DEVELOP A PRODUCT FOR MACROTECH 
Computer Products Ltd. 

- either a new product or a program (compatible with Apple II, Apple 
III or I.B.M. Personal Computer) enhancing our product line and we 
may make it worth your while to contact usi 

*1 t.m. of Macrotech Computer Products Ltd. 

*2 t.m. of Apple Computers Ine. 

*3 t.m. of Digital Research, Ine. 

*4 t.m. of Visicorp. 

*5 t.m. of Saturn Systems Ine. 

*6 t.m. of Regents of thè University of California. 

*7 t.m. of I.B.M. 

*8 t.m. of Legend Industries Ltd. 

*9 t.m. of Prometheus Products Ine. 

Canada 1370 Marine Di , North Vancouver, B.C. V7P 1T4 • Tel. (604) 984 9305 
USA 3249 Hackett Ave., Long Beach, California 90808 
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THE 

STATISTICS 

SERJES 

FLEXIBLE • ACCURATE 
EASY-TO-USE 

Human Systems Dynamics programs are 
used by leading universities and medicai 
centers. Any program that doesn't suit 
your needs can be returned within 10 
days for full refund. Designed for use 
with Apple II 48K, 1 or 2 Disk Drives, 3.3 
DOS, ROM Applesoft. 


STATS PLUS *200 

Complete General Statistics Package 
Research Data Base Management 
Design and Restructure Your Flles 
Count, Search, Sort, Review/Edit 
Add, Delete, Merge Files 
Computa Data Fields, Create Subfiles 
Interface with Other HSD Programs 
Produce Hi-Res Bargraphs, Plots 
1-5 way Crosstabulation 
Descriptlve Statistics for All Fields 
Chi-Square, Flsher Exact, Signed Ranks 
Mann-Whltney, Kruskal-Wallis, Rank Sum 
Friedman Anova by Ranks 
10 Data Transformations 
Frequency Distribution 
Correlation Matrix, 2 Way Anova 
r, Rho, Tau, Partial Correlation 
3 Variable Regression, 3 t-Tests 


ANOVA II *150 

Complete Analysis of Variance Package 
Analysis of Covariance, Randomized Designs 
Repeated Measures, Split Plot Designs 
1 to 5 Factors, 2 to 36 Levels Per Factor 
Equal N or Unequal N, Anova Table 
Descriptive Statistics, Marginai Means 
Celi Sums of Squares, Data File Creation 
Data Revlew/Edit, Data Transformations 
File Combinations, All Interactions Tested 
High Resolution Mean Plots, Bargraphs 


HSD REGRESS *99 95 

Complete Multiple Regression Analysis 
Up to 25 Variables, 300 Cases/Variable 
Correlation Matrices, Descriptive Statistics 
Predicted & Residuai Scores, File Creation 
Regression on Any Subset of Variables 
Regression on Any Order of Variables 
Hi-Res Scatterplot & Residuai Plot 
Keyboard or Disk Data Input 
Case x Case, Variable x Variable Input 



HUMAN SYSTEMS DYNAMICS 

To Order— Cali (213) 993-8536 


or Write 

HUMAN SYSTEMS DYNAMICS 
9010 Reseda Blvd. Suite 222 



Northridge, CA 91324 


E] 


Listing continued. 


8018- 

09 

38 


1470 


CMP 

#*38 

A GOOD NUMBER? 

301 ft- 

10 

E4 


1480 


BPL 

START 

IF NOT GOOD, START OVER 

SO IO 

29 

OF 


1490 


AND 

#*0F 

MASK ASCII PORTION 

SOIE- 

OA 



1500 


ASL 


SHIFT TO LEFT HALF 

801F- 

OA 



1510 


ASL 



8020- 

OA 



1520 


ASL 



8021- 

OA 



1530 


ASL 



3022- 

AA 



1540 


TAX 


PUT IN INDEX 

3023- 

85 

04 


1550 


STA 

SLOT 

SAVE IT 

3025- 




1560 

dune 

. EQ 

* 

COME HERE WHEN FINISHED 

3025- 

BD 

SO 

co 

1570 


LDA 

RESET,X 

RESET PROGRAMMER 

3028- 




1580 

CHOQSE 

.EQ 

* 

CHOOSE FUNCTION 

3023- 

20 

42 

81 

1590 


J3R 

BANNER 

PRINT SCREEN HEADINO 

302B- 

AB 

A3 

81 

1600 


LDA 

CHOICE 

GET MSG ADR LOW 

802E- 

85 

00 


1610 


STA 

PRTPTR 

PUT IN PRINT POINTER 

3030- 

AD 

A9 

31 

1620 


LDA 

CHGICE+1 

GET MSG ADR HI 

8033- 

85 

01 


1630 


STA 

PRTPTR+1 

PUT IN PRINT POINTER 

8035- 

20 

14 

31 

1640 


JSR 

PRINT 

PRINT CHOICE MESSAGE 

8033- 

20 

OC 

FD 

1650 


JSR 

RDKEY 

GET OPERATOR INPUT 

803B- 

29 

7F 


1660 


AND 

#*7F 

MASK OFF MSB 

803D- 

09 

31 


1670 


CMP 

#ONE 

18 IT A 1? 

803F- 

DO 

03 


1680 


BNE 

CK2 

NOT ONE, CHECK FOR 2 

8041- 

40 

E3 

80 

1690 


JMP 

READ 

WAS A 1, GO TO READ SECTION 

8044- 




1700 

CK2 

. EQ 

* 

CARRY ON WITH INPUT CHECK 

3044- 

09 

32 


1710 


CMP 

#TWO 

IS IT A 2? 

8046- 

FO 

07 


1720 


BEQ 

PROG 

YES, GO PROGRAM AN EPROM 

8048- 

C9 

33 


1730 


CMP 

#THREE 

IS IT A 3? 

304A— 

DO 

DC 


1740 


BNE 

CHOOSE 

NO, ILLEGAL INPUT, REDO 

304C- 

4C 

10 

10 

1750 


JMP 

SCASMB 

EXIT TO ASSEMBLER 

804F- 




1760 

PROG 

.EQ 

« 

PROGRAM AN EPROM 

804F- 

20 

53 

81 

1770 


JSR 

PUTIN 

HAVE OPERATOR PUT EPROM IN SOCKET 

8052- 

BD 

82 

co 

1780 


LDA 

RELAY,X 

TOGGLE RELAY 

8053- 

A9 

64 


1790 


LDA 

#100 

SET UP 100MS WAIT 

8057- 

20 

2B 

81 

1800 


JSR 

WAIT 

WAIT 

805A- 

A9 

00 


1810 


LDA 

#00 

ENIT BUFFER POINTER 

805C- 

35 

02 


1820 


STA 

BUFFER 

SAVE IT 

805E- 

A9 

08 


1830 


LDA 

#0© 

BUFFER STARTS AT *300 

8060- 

85 

03 


1340 


STA 

BUFFER+1 

SAVE IT 

8062- 

AO 

00 


1850 


LDY 

#00 

INIT INDEX 

8064- 




1860 

GETDTA 

.EQ 

* 

PROGRAM LOOP 

8064- 

B1 

02 


1870 


LDA 

(BUFFER) 

Y GET DATA 

8066- 

9D 

84 

CO 

1880 


STA 

DATA,X 

PUT IN LATCH , 

8069- 

BD 

83 

CO 

1890 


LDA 

PGM, X 

TOGGLE PROGRAM PIN 

806C- 

A9 

32 


1900 


LDA 

#50 

SET UP 50 MS WAIT 

S06E- 

20 

2B 

81 

1910 


JSR 

WAIT 

WAIT 

8071- 

BD 

33 

CO 

1920 


LDA 

PGM, X 

TOGGLE PGM PIN 

8074- 

BD 

85 

co 

1930 


LDA 

RDENBL,X 

ENABLE READ MODE 

3077- 

BD 

87 

co 

1940 


LDA 

PRMDAT,X 

GET PROM DATA 

807A- 

DI 

02 


1950 


CMP 

(BUFFER) 

Y COMPARE WITH EXPECTED DATA 

807C- 

DO 

14 


1960 


BNE 

WRERR 

IF NO MATCH, GO PRINT ERROR REPORT 

807E- 

BD 

86 

co 

1970 


LDA 

WRENBL,X 

ENABLE WRITE MODE 

8081- 

BD 

81 

co 

1980 


LDA 

BMPADR,X 

BUMP PROM ADR 

8084- 

08 



1990 


INY 


INCREMENT INDEX 

8035- 

DO 

DD 


2000 


BNE 

GETDTA 

IF NOT 256, THEN CONTINUE 

8087- 

A5 

03 


2010 


LDA 

BUFFER+1 

GET CURRENT POINTER 

8Ó89- 

09 

OF 


2020 


CMP 

#*0F 

CHECK FOR LAST PAGE <*FQ0> 

30SB- 

FO 

98 


2030 


BEQ 

DONE 

IF LAST PAGE AND Y*256, THEN DONE 

30SD- 

E6 

03 


2040 


INC 

BIJFFER+1 

BUMP PAGE 

S08F- 

40 

64 

80 

2050 


JMP 

GETDTA 

DO NEXT BYTE 

8092- 




2060 

WRERR 

.EQ 

* 

WRITE VERIFY ERROR 

6092- 

AD 

10 

82 

2070 


LDA 

WRMSG 

WRITE ERROR MSG ADR LO 

8095- 

83 

00 


2080 


STA 

PRTPTR 

PUT IN PRINT POINTER 

8097- 

AD 

1D 

82 

2090 


LDA 

WRMSG+1 

WRITE ERROR MSG ADR HI 

809A- 

85 

01 


2100 


STA 

PRTPTR+1 

PUT IN PRINT POINTER 

809C- 

20 

14 

81 

2110 


JSR 

PRINT 

PRINT FIRST PART OF ERROR REPORT 

809F- 

A5 

03 


2120 


LDA 

BUFFER+1 

GET CURRENT PAGE NUMBER 

SOA1- 

20. DA 

FD 

2130 


JSR 

PRBYTE 

PRINT PAGE NUMBER 

S0A4- 

93 



2140 


TYA 


CURRENT BYTE IN PAGE TO A 

80A5- 

20 

DA 

FD 

2150 


JSR 

PRBYTE 

PRINT ROM ADDRESS LOW 

80A3- 

AD 

36 

82 

2160 


LDA 

ROMMSG 

ROM DATA PREFIX LO 

80AB- 

85 

00 


2170 


STA 

PRTPTR 

PUT IN PRINT POINTER 

80 AD- 

AD 

37 

82 

2180 


LDA 

ROMMSG+1 

ROM DATA PREFIX HI 

30B0- 

85 

01 


2190 


STA 

PRTPTR+l 

PUT IN PRINT POINTER 

80B2- 

20 

14 

81 

2200 


JSR 

PRINT 

PRINT ROM DATA PREFIX 

30B5- 

BD 

©7 

CO 

2210 


LDA 

PRMDAT,X 

GET PROM DATA 

80B8- 

20 

DA 

FD 

2220 


JSR 

PRBYTE 

PRINT IT 

30BB- 

AD 

3F 

82 

2230 


LDA 

BFRMSG 

GET BUFFER DATA PREFIX 

80BE- 

35 

00 


2240 


STA 

PRTPTR 

PUT IN PRINT POINTER 

80C0— 

AD 

40 

82 

2250 


LDA 

“BFRMSG+1 

GET BUFFER DATA PREFIX HI 

80C3— 

35 

01 


2260 


STA 

PRTPTR+1 

PUT IN PRINT POINTER 

8005- 

20 

14 

81 

2270 


JSR 

PRINT 

PRINT BUFFER DATA PREFIX 

S0C8- 

B1 

02 


2230 


LDA 

(BUFFER) 

Y GET BUFFER DATA 

80CA- 

20 

DA 

FD 

2290 


JSR 

PRBYTE 

PRINT BUFFER DATA 

80CD- 

AD 

49 

82 

2300 


LDA 

RESMSG 

RESTART MESSAGE 

80D0- 

85 

00 


2310 


STA 

PRTPTR 

PUT IN PRINT POINTER 

80D2- 

AD 

4A 

32 

2320 


LDA 

RESMSG+1 

RESTART MESSAGE ADR HI 

80D5- 

85 

01 


2330 


STA 

PRTPTR+1 

PUT IN PRINT POINTER 

80D7- 

20 

14 

81 

2340 


JSR 

PRINT 

PRINT MESSAGE 

80DA- 

BD 

80 

CO 

2350 


LDA 

RESET,X 

TURN OFF PROGRAM VOLTAGE 

80DB- 

20 

OC 

FD 

2360 


JSR 

RDKEY 

WAIT FOR OPERATOR TO CONTINUE 

80E0- 

40 

25 

80 

2370 


JMP 

DONE 

GO DO NEXT SELECTION 

80E3- 




2330 

READ 

.EQ 

* 

READ EPROM INTO MEMORY 

SOE3- 

20 

53 

81 

2390 


JSR 

PUTIN 

PUT EPROM IN SOCKET 

30E6- 

A 9 

00 


2400 


LDA 

#00 

INIT BUFFER POINTER 

80E8— 

85 

02 


2410 


STA 

BUFFER 

LOW HALF 

80EA- 

A9 

OS 


2420 


LDA 

#03 

BUFFER AT *800 

80EC- 

85 

03 


2430 


STA 

BUFFER+1 

UPPER HALF 

SOEE- 

AO 

00 


2440 


LDY 

#00 

INIT INDEX 


Listing continued. 
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LMng contmued. 


80F0- BD 

85 

CO 

2450 


LDA 

RDENBL»X 

ENABLE READ FUNCTION 

S0F3- BD 

32 

co 

2460 


LDA 

RELAY,X 

TOGGLE (TURN ON) RELAY 

80F6- A9 

64 


2470 


LDA 

#100 

SET UP 100 MS WIAT 

80FS- 20 

2B 

SI 

2480 


JSR 

WAIT 

WAIT FOR RELAY 

30FB- 



2490 

RLOOP 

.EQ 

* 

READ DATA LOOP 

30FB- BD 

87 

CO 

2500 


LDA 

PRMDAT,X 

GET EPROM DATA 

SOFE- 9t 

02 


2510 


STA 

(BUFFER), 

Y PUT IN MEMORY BUFFER 

8100- BD 

81 

CO 

2520 


LDA 

BMPADR,X 

BUMP EPROM ADDRESS COUNTER 

8103- C8 



2530 


INY 


BUMP BUFFER INDEX 

8104- DO 

F5 


2540 


BNE 

RLOOP 

DO NEXT BYTE 

81.06- A 5 

03 


2550 


LDA 

BUFFER+1 

GET BUFFER POINTER HIGH 

3108- C9 

OF 


2560 


GMP 

#*QF 

CHECK FQR.LAST PAGE 

810A- DO 

03 


2570 


BNE 

RLCONT 

IF NOT LAST PAGE, CONTINUE 

SIOC- 4C 

25 

so 

2580 


JMP 

DONE 

LAST PAGE, EXIT 

810F- 



2590 

RLCONT 

.EQ 

* 

CONTINUE DATA LOOP 

810F- E6 

03 


2600 


INC 

BUFFER+1 

BUMP TO NEXT PAGE 

3111- 4C 

FB 

80 

2610 


JMP 

RLOOP 

DO NEXT BYTE 

3114- 



2620 

PRINT 

.EQ 

* 

PRINT MESSAGE ROUTINE 

8114- 43 



2630 


PHA 


SAVE A 

8115- 98 



2640 


TYA 


GET Y 

8116- 48 



2650 


PHA 


SAVE Y 

8117- AO 

00 


2660 


LDY 

#00 

INIT INDEX 

8119- 



2670 

PRLOOP 

• EQ 

* 

PRINT CHAR LOOP 

8119- B1 

00 


2680 


LDA 

(PRTPTR) 

Y GET DATA 

SUB- C9 

03 


2690 


CMP 

#03 

END? 

SUD- FO 

08 


2700 


BEQ 

PRDONE 

YES, EXIT 

811F— 09 

80 


2710 


ORA 

#*80 

NO, SET MSB 

8121- 20 

FO 

FD 

2720 


JSR 

C0UT1 

PUT ON SCREEN 

8124- C8 



2730 


INY 


BUM INDEX 

8125- DO 

F2 


2740 


BNE 

PRLOOP 

PRINT 256 CHARS MAX 

8127- 



2750 

PROGNE 

.EQ 

* 

PRINTING FINISHED 

8127- 68 



2760 


PLA 


GET Y 

8123- A3 



2770 


TAY 


PUT IN Y 

8129- 63 



2780 


PLA 


GET A 

812A- 60 



2790 


RTS 


RETURN 

812B- 



2800 

WAIT 

.EQ 

* 

WAIT X MILLISECONDS 

312B- 35 

05 


2810 


STA 

COUNT 

SAVE WAIT COUNT 

S32D- 43 



2820 


PHA 


SAVE A 

812E- 8A 



2830 


TXA 


GET X 

812F- 43 



2840 


PHA 


SAVE X 

8130- 98 



2850 


TYA 


GET Y 

8131- 43 



2860 


PHA 


SAVE Y 

8132“ A6 

05 


2870 


LDX 

COUNT 

GET MS COUNT 

8134- 



2880 

WL00P1 

.EQ 

* 

OUTER LOOP 

8134- AO 

CC 


2390 


LDY 

#*cc 

GET COUNT FOR 1 MS 

8136- 



2900 

WL00P2 

.EQ 

* 

INNER LOOP 

8136- 88 



2910 


DEY 


DECREMENT 1 MS COUNT 

8137- DO 

FD 


2920 


BNE 

WLOOP2 

KEEP UP FOR 1 MS 

8139- CA 



2930 


DEX 


DEC COUNT 

313A- DO 

F3 


2940 


BNE 

WL00P1 

DECREMENT TOTAL COUNT 

313C- 68 



2950 


PLA 


GET Y 

313D- A3 



2960 


TAY 


PUT IN Y 

S13E- 68 



2970 


PLA 


GET X 

313F- AA 



29S0 


TAX 


PUT IN X 

8140- 63 



2990 


PLA 


GET A 

3141- 60 



3000 


RTS 


RETURN 

8142- 



3010 

BANNER 

.EQ 

* 

PRINT SCREEN HEADING 

8142- 20 

53 

FC 

3020 


JSR 

CLEAR 

CLEAR SCREEN 

8145- AD 

FC 

81 

3030 


LDA 

HDNG 

HEADING ADR LO 

8143- 35 

00 


3040 


STA 

PRTPTR 

PUT IN POINTER 

814A- AD 

FD 

81 

3050 


LDA 

HDNG+1 

HEADING ADR HI 

814D- 85 

01 


3060 


STA 

PRTPTR+1 

PUT IN POINTER 

314F- 20 

14 

81 

3070 


JSR 

PRINT 

PRINT HEADING 

3152- 60 



3080 


RTS 


RETURN 

8153- 



3090 

PUTIN 

.EQ 

* 

PUT EPROM INTO SOCKET ROUTINE 

8153- 20 

42 

31 

3100 


JSR 

BANNER 

CLEAR SCREEN AND PRINT HEADING 

8156- AD 

77 

81 

3110 


LDA 

STRMSG 

START MESSAGE ADR LO 

3159- SS 

00 


3120 


STA 

PRTPTR 

PUT IN PRINT POINTER 

815B- AD 

78 

©1 

3130 


LDA 

STRMSG+i 

START MESSAGE ADR HI 

S15E- 35 

01 


3140 


STA 

PRTPTR+1 

PUT IN PRINT POINTER 

3160- 20 

14 

81 

3150 


JSR 

PRINT 

PRINT SOCKET MESSAGE 

8163- 20 

OC 

FD 

3160 


JSR 

RDKEY 

WAIT FOR KEYSTROKE 

3166- 60 



3170 


RTS 


RETURN AFTER KEYSTROKE 

3167- 



3180 

GETSLT 

.EQ 

* 

GET SLOT # MSG 

3167- 69 

81 


3190 


.DA 

GETSLT+2 

POINTER TO STRINO 

8169- 53 

4C 

4F 






816C- 54 

20 

4E 






316F- 55 

4D 

42 






8172- 45 

52 

3D 






8175- 3F 



3200 


. AS 

"SLOT NUMBER*?" 

3176- 03 



3210 


.DA 

#ETX 


8177- 



3220 

STRMSG 

.EQ 

* 

START PROGRAMMINO MSG 

8177- 79 

81 


3230 


.DA 

STRMSG+2 


3179- 50 

4C 

41 






317C- 43 

45 

20 






317F- 32 

35 

31 






SÌ82- 36 

20 

49 






3185- 4E 

20 

53 






8133- 4F 

43 

4B 






318B- 45 

54 

2E 

3240 


. AS 

"PLACE 2516 IN SOCKET." 

81SE- OD 



3250 


.DA 

#CR 


818F- 50 

52 

45 






3192- 53 

53 

20 






8195- 41 

4E 

59 






8198- 20 

4B 

45 






819B- 59 

20 

54 






819E- 4F 

20 

53 






31A1- 54 

41 

52 







Li»Hng contmued. 


MEMOREX 

FLEXIBLE DISCS 


WE WILL NOT BE UNDER- 
SOLDtl Cali Free (800)235-4137 

for prices and information. Dealer 
inquiries ìnvited and CO.D.’s 
accepled 



PACIFIC 

EXCHANGES 

100 Foothill Blvd 
San Luis Obispo. CA 
93401 In Cai cali 
(800)592-5935 or 
1805)543-1037 


Circie 67 on Reader Service card. 


P.F.S.* Users, 
Time is Money! 

Your entire program can run 
2'h times faster with our 

New Speedup System! 

•trademark; Software Pub. Co. 



The Lolx'ro Building PC). Box 2342 
Santa Barbara. Ca. 93120 
(80S) 966-1140 Telex 6S84 19 


Circle 168 on Reader Service card. 



Dot Matrix Printer Interfaces with Apple II 

Featuring an Apple ll®-compatible parallel 
interface, Addmaster Corporation has produced 
a new dot matrix printer, Model 170. The inter¬ 
face includes a Centronics-type handshake and 
DB-25 interface connector, Baudot, and day — 
and time clock. The Model 170 provides 18 or 
21 characters per line, 6 lines per inch print 
density, on standard 2 V 2 " adding machine tape. 
Designed to use with personal computers, 
Model 170 will produce hard and carbonless 
copies of programs, data or results. Write 
Addmaster Corporation, 416 Junipero Serra Dr., 
San Gabriel, CA 91776 or cali 213/285-1121. 
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"Adding read capability is fairly simple and should 
take less time than building thè originai Circuit." 


Listmg continued. 






81A4- 54 

2E 


3260 

. AS 

"PRESS ANY KEY TO START." 

31A6- 03 



3270 

.DA 

#ETX 

81A7- 07 



3230 

.DA 

#BELL 

81 A3- 



3290 

CHOICE .EQ 

* CHOOSE FUNCTION MESSAGE 

SIA3- AA 

81 


3300 

.DA 

CHOICE+2 

31AA- 20 

20 

20 




81AD- 20 

20 

20 




81B0- 45 

4E 

54 




! 81B3- 45 

52 

20 




81B6- 54 

4F 


3310 

.A3 

" ENTER TO" 

8IBS- OD 



3320 

.DA 

#CR 

81B9- 20 

20 

20 




81BC- 20 

20 

20 




81 BF- 20 

20 

31 




S1C2- 20 

20 

20 




| 3105- 52 

45 

41 




SI OS- 44 

20 

45 




81CB- 50 

52 

4F 




S1CF- 4D 



3330 

. AS 

" 1 READ EPROM" 

S1CF- OD 



3340 

.DA 

#CR 

31 DO- 20 

20 

20 




S1D3- 20 

20 

20 




81D6- 20 

20 

32 




81D9- 20 

2Ò 

20 




81OC- 50 

52 

4F 




81BF— 47 

52 

41 




81E2- 4D 

20 

45 




S1E5- 50 

52 

4F 




31ES- 4D 



3350 

. AS 

" 2 PROGRAM EPROM" 

81E9- OD 



3360 

. DA 

#CR 

SIEA- 20 

20 

20 




31 ED- 20 

20 

20 




S1F0— 20 

20 

33 




31F3- 20 

20 

20 




81F6- 45 

58 

49 




S1F9- 54 



3370 

. AS 

" 3 EXIT" 

SI FA- 07 



3380 

.DA 

#BELL 

31FB- 03 



3390 

.DA 

#ETX 

S1FC- 



3400 

HONG .EQ 

* SCREEN HEADING 

81FC- FE 

81 


3410 

. DA 

HDNG+2 

SI FÉ- 20 

20 

20 




3201- 20 

20 

20 




3204- 20 

20 

20 




8207- 20 

20 

20 




820A- 32 

35 

31 




320D- 36 

20 

50 




8210- 52 

4F 

47 




8213- 52 

41 

40 




3216- 4D 

45 

52 

3420 

. AS 

" 2516 PROGRAMMER" 

8219- OD 



3430 

. DA 

#CR 

821A- OD 



3440 

. DA 

#CR 

321B- 03 



3450 

.DA 

#ETX 

821C- 



3460 

WRMSG . EQ. 

* WRITE VERIFY ERROR 

321C- 1E. 

32 


3470 

.DA 

WRMSG+2 

821E- OD 



3430 

.DA 

#CR 

321F- OD 



3490 

.DA 

#CR 

8220- 56 

45 

52 




8223- 49 

46 

59 




8226- 20 

45 

52 




3229- 52 

4F 

52 

3500 

. AS 

"VERIFY ERROR" 

822C- OD 



3510 

. DA 

#CR 

822D- 41 

44 

44 




3230- 52 

45 

53 




3233“ 53 

3D 


3520 

.AS 

"ADPRESS=" 

3235- 03 



3530 

.DA 

#ETX 

8236- 



3540 

ROliMSG .EQ 

* ROM DATA PREFIX 

3236- 38 

32 


3550 

.DA 

ROMMSG+2 

3233- 2C 

20 

52 




823B- 4F 

4D 

3D 

3560 

.AS 

", RQM=" 

823E- 03 



3570 

. DA 

#ETX 

823F- 



3530 

BFRMSG .EQ 

* BUFFER DATA PREFIX 

S23F- 41 

32 


3590 

.DA 

BFRMSG+2 

3241- 2C 

20 

42 




8244- 46 

52 

3D 

3600 

. AS 

", BFR=" 

3247- 07 



3610 

.DA 

#BELL 

8248- 03 



3620 

.DA 

#ETX 

8249- 



3630 

RESMSG .EQ 

* RESTART MESSAGE 

8249- 4B 

32 


3640 

. DA 

RESMSG+2 

824B- OD 



3650 

.DA 

#CR 

i 8240 OD 



3660 

. DA 

#CR 

324D- 50 

52 

45 




3250- 53 

53 

20 




3253- 41 

4E 

59 




8256- 20 

4B 

45 




3259- 59 

20 

54 




8250 4F 

20 

43 




325F- 4F 

4E 

54 




3262- 49 

4E 

55 




8265- 45 



3670 

. AS 

"PRESS ANY KEY TO CONTINUE" 

3266- 03 



3630 

. DA 

#ETX 




3690 

-EN 
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mode, U5 is disabled. This will leave 
thè output of U5 in thè tristate mode 
so as not to interfere with thè data bus 
drivers on thè 2516 EPROM. 

Function 7 is used to go into thè 
program mode unconditionally. Pro¬ 
gram mode can be set up three ways: 
by reading (or writing) to address 6 
($C0X6), resetting thè Apple, or tog- 
gling function 6 while in thè read 
mode. Writing to address 6 causes U3 
pin 9 to pulse low, which causes U7 
pin 6 to pulse low, which clears U8, 
making U8 pin 5 go low. U8 pin 5 be- 
ing low enables U5 through U5 pin 1, 
thè output driver enable pin. 

Function 8 reads EPROM data, 
Reading address 7 ($C0X7) causes U6 
pin 20 and U9 pin 1 to pulse low. This 
enables EPROM data at thè current 
address onto thè inputs of U9, and thè 
inputs of U9 are enabled onto thè Ap¬ 
ple data bus, 

Thus, adding read capability to thè 
EPROM programmer hardware is 
fairly simple and should take less time 
than thè day required to build thè 
originai circuit. 

Software Enhancements 

I made some software improve- 
ments to utilize thè improved hard¬ 
ware. The program stili requires thè 
slot number, but another choice must 
be made: READ or PROGRAM. 

The read portion starts at label 
READ. After thè EPROM is in thè 
socket, read mode is enabled and 
power applied to thè device. A loop 
similar to thè write loop is used to get 
EPROM data and send it to thè buffer 
rather than taking it from thè buffer. 

Now that a PROM can be read, I’ve 
added a verify function to thè write 
loop. PROM data is read and com- 
pared with thè buffer data after each 
write. This adds almost no time to thè 
program loop. 

Two new subroutines have been 
added. BANNER is used to clear thè 
screen and print a heading across thè 
top followed by two carriage returns. 
PUTIN is used to print a message to 
thè screen requesting that thè 
EPROM be placed in its socket. 

Other Changes 

The dc-to-dc converter has been 
changed to an Elpac CL-3803 (or 
CL-3804). The Elpac is easier to ob- 





Circle 78 on Reader Service card. 


Circle 201 on Reader Service card. 



Epson, OKI, IDS, NEC, Diablo, Qume 


• Reduces Noise Up to 90% • Bottom Feed Capabflity 

• Heavy Duty Acrylic Cover • Woodgrain Finish 


Micro Printercenter™ 

Dealer & Ordering Info 

800-343-4311 

Master Charge and Visa Accepted 
Shipping & Handling Charges Additional 

* CAB-TEK, Ine. 

Riverside St. Nashua, NH 03062 
CIVILIZING COMPUTERS 


MPC I $99 (MX 80) MPC II $129 (0KI82) 

MPC III $179 (83A, MX100) MCP IV $199 (Daisy Printer) 
Power Control & Ventilation $80 
Paper Rack $30 Bottom Feed Brackets $30 
MPC I SHOWN 


ACOUSTIC ENCLOSURES 



PhotoCaster...a new feature packed System to take, 
process, store, print, send and receive color and black- 
and-white photos with your Apple II computer. 

PC-100 (disk software, I/O board, manual, 

demo tape) .$499.95 

PC-101 (above plus Panasonic TV camera, 

RGB filteraccessory).$749.95 

Write or cali for details 

Visa and MasterCard orders accepted. Shipping charges and appli¬ 
catile California sales tax will be added. 

Apple II TM Apple Computer, Ine. HCACT 

PhotoCaster TM COMMSOFT, Ine. vl/ITlfTl|JOvr I 


(415) 493-2184 


COMMDSOFT 

2452 Embarcadero Way 
Palo Alto.CA 94303 


Circle 219 on Reader Service card. 



SDA HAS THE PROGRAMS 
T0 PLAN YOUR FUTURE! 


Career Directions 

•Assess Interests 
•Select Occupations 
•Explore Options 
•Develop Career Plans 


College Directions 
Select colleges based on 
•Cost and Size 
•Admission Standards 
•Areas of Studies 
•and many more factors 


User Friendly 
2 Diskette Programs 


For Apple 




Success Through Planning 


See Your 

Authorized Apple Dealer or Contact: 
Systems Design Associates, Ine. 

P. 0. Box 389 

Charleston, West Virginia 25322 
(304) 342-0769 
Visa MasterCard 
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"Additional functions can be added from software, 
such as buffer comparison with an EPROM, and 
selective reading of any particular EPROM location.” 


tain than my previous choice. How- 
ever, it has a 28 V output. Since 28 V 
is too high, a resistor and zener diode 
Circuit was designed to drop thè volt- 
age to an acceptable value. 

The dc-to-dc converter draws more 
current than thè previous reed relay 
could handle. A new relay has been 
included along with a new driver IC 
to supply thè extra coil current. 

Note that during operation this 
board puts a substantial load on thè 
Apple 5 V power supply. You should 
consider removing any unnecessary 
boards in thè I/O slots while program- 
ming EPROMs. 

Other Improvements 

Additional functions can be add¬ 
ed from software, such as buffer 


Symbol table. 

8142- 

BANNER 

0007- 

BELL 

S 23F- 

BFRMSC 

C031- 

BliPABR 

0002- 

BUFFER 

31A8- 

CHOICE 

8023- 

CHOOSE 

8044- 

CK2 

FC58- 

CLEAR 

0005- 

COUNT 

FBFO- 

COLITI 

000'D- 

CR 

0084- 

DATA 

8025- 

DONE 

0003- 

ETX 

8064- 

GETDTA 

8167- 

GETSLT 

81FC- 

HONG 

FF69- 

MONITR 

0031- 

ONE 

C083- 

PGM 

FBDA- 

PRBYTE 

8127- 

PROGNE 

3114- 

PRINT 

3119- 

PRLOOF' 

C087- 

PRMDAT 

804F- 

PROG 

0000- 

PRTPTR 

8153- 

PUTIN 

C085- 

RDENBL 

FDOC- 

RDKEY 

80E3- 

READ 

C032- 

RELAY 

C030- 

RESET 

8249- 

RESMSG 

310F- 

RLCONT 

80FB- 

RLOOP 

3236- 

ROMMSG 

1010- 

SCASMB 

0004- 

SLOT 

8000- 

START 

■8177- 

STRMSG 

0033- 

THREE 

0032- 

TWO 

812B- 

WAIT 

3134- 

WLOOP1 

8136- 

WLOOP2 

C086- 

WRENBL 

8092- 

WRERR 

8210- 

WRMSO 

: PR#0 



comparison with an EPROM, and 
selective reading (or writing) of any 
particular EPROM location. These 
capabilities exist in thè hardware 
and thè basic software has been 
provided. 

You can get copies of thè source 


and object programs for both proj- 
eets by sending $7.95 to thè author. 
(Texas residents add 5 percent sales 
tax.) Software will be provided on 
disk. By thè time this goes to print a 
supply of assembled units should be 
available. ■ 



Figure la. Relay. dc-to-dc converter. 



GND 


Figure Ib. Schematic of EPROM programmer. 
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Circle 45 on Reader Service card. 




Computer Products 


Letter Quallty Printer by Comrex 

Uses convenient cassette type print 
wheels, standard ribbon cartridges. Bi- 
directional printing at 17 CPS, up to 16" 
wide paper, semi-automatic paper loader. 

PRD-11001 Centronics Parallel _$899.95 

PRD-11002 RS-232C serial _$969.95 

PRA-11000 ‘ ractor option _ $169.95 

Okldata We Can Beat Any Prlce!! 

Inexpensive highly reliable, industriai 
quality printers. 

PRM-43082 Oki 82A 120 CPS 132 coi CALL 
PRM-43083 Oki 83A 120 CPS 233 coi. CALL 

PRM-43084 Oki 84 200 CPS paralisi_ CALL 

PRM-43085 Oki 84 200 CPS serial w/2K CALL 

NEW! Okldata 92 & 93 

160 cps standard printing, 
correspondence quality printing, dot- 
addressable graphics, and alternate 
downline loadable character sets. 

PRM-43092 ML92 parallel _ CALL 

PRM-43093 ML93 parallel _ CALL 

PRM-43192 ML92 serial _ CALL 

PRM-43193 ML93 serial _ CALL 

PRA-43092 ML92 tractor _ CALL 

Gemini Printers by Star Mlcronlcs 

Economically priced, high quality, 
Epson-compatible lOOcps, 9 x 9 dot 
matrix, 2.3K buffer, friction & tractor 
feed, bit-image graphics. 

PRM-66010 Gemini 10 (10" carriage) $379.95 
PRM-66015 Gemini 15 (15" carriage) $579.95 
PRA-66200 Gemini serial board _ _$85.00 

Printer Interface Card & Cable 
tor Apple II 

Interfaces any Centronics parallel printer 
to Apple ll/+/e 

IOP-2100A Apple card & cable_ $59.95 

Mlcrobuffers 
by Practlcal Perlpherals 

Available in Epson, Apple, and in-line 
versions both serial and parallel. 

IOP-2510A Inline, 64K parallel _ _$339.95 

IOP-2530A Inline, 64K serial _ _$339.95 

IOP-2540A Epson parallel 16K _$159.95 

IOP-2550A Epson serial 8K _$159.95 

IOP-2570A Apple parallel 32K _$289.95 

IOP-2590A Apple serial 32K_$289.95 

Grappler Plus by Orango Micro 

Latest version of thè popular Apple 
parallel printer interface with graphics. 

IOP-2300A Grappler + _$139.95 


We accept cash, checks, credit cards, or Purchase Orders 
from qualified firms & institutions. Minimum prepald order $15 
California residents add 6y 2 % tax. Export customers outsidethè 
US or Canada please add 10% to all prices. Prlcea and avaHIbMIty 
subject to change without notlce. Shipping & handling charges 
via UPS Ground 50C/lb. UPS Air $1.00/lb minimum charge $3.00 


NEW! CP/M ® 3.0 PLUS Card for 
Apple by ALS 

The most powerful CP/M card available 
6MHz Z-80B, additional 64K of RAM, 
CP/M 3.0 Plus, C—BASIC, CP/M 
Graphics, full CP/M 2.2 compatibility. 

CPX-62810A _$359.95 

ALS Z-Card for Apple II 

Z-80 card with CP/M 2.2, like Softcard. 

CPX-62800A ___$159.95 

80 Column Smarterm II by ALS 

80 column x 25 line video card, 25th 
addressable line, 7x9 matrix with true 
descenders, 40 or 80 column keyboard 
selectable, true shift key operation, 
Pascal & CP/M compatible, memory 
mapped. 

IOV-2500A_$179.95 

The Dlspatcher by ALS 

Totally Apple Compatible serial I/O board 
for printers, modems, or terminals. 

IOMOOOA _$99.95 

16K RAM Card for Apple II 

Expand your Apple II to 64K, use as 
language card, full one year warranty. 

MEX-16700A Save up to $100 _ $59.95 

USI Video Monltors 

20 MHz bandwidth, 1000 lines resolution. 

VDM-750920 9" green _ $99.95 

VDM-750910 9” amber _ $129.95 

VDM-751220 12" green _ $129.95 

VDM-751210 12" amber _ $139.95 

Taxan RGB Color Monitore 

18 MHz, choice of medium or super hi-res 

VDC-821210 RGB Vision-I _ _$399.95 

VDC-821230 RGB Vision ili _$699.95 

VDA-821200 RGB card & cable _$129.95 

VDA-821220 Apple m_$19.95 

Zenlth Hl-Res 12" Green 

15 MHz. switchable 40 or 80 columns. 

VDM-201201 List price $189.95 _$114.95 

Kraft Systems Joystick 

Dual mode-spring return or free floating. 
full one-year warranty. 

SYA-1513A Apple joystick_ $59.95 

System Saver by Kenslngton 

Cooling fan, surge suppressor, and dual 
switched outlets; clips onto thè side of 
your Apple ll/X/e 

SYA-1520A _$79.95 


Place Orders Toll Free 


4901 W. Rosecrans, Hawthorne, CA 90250 


Bargaln Dlskettes 

Major manufacturer, lowest prices 
5y 4 " SS SD soft sector w/hub rings 

MMD-5110105 Box of ten_$19.95 

Verbatlm Optlma ® Dlskettes 

These are theabsolute ultimate in quality. 
there are none better! Guaranteed 17 
years! packaged in versatile Disk Bank 
Storage boxes. 5y 4 " SS DD soft sector 
w/hub rings. (boxes of 10 only) 
MMD-5120102 _$67.95 

Plexiglass Disk Tub 

convenient Storage for up to 50 diskettes. 
MMA-505 5y 4 " flip file _$21.95 

Apple Disk Drive by Vista Solo 

All thè capabilities of thè Apple brand 
drives at a fraction of thè cost. Totally 
DOS, Pascal and CP/M compatible. 

MSM-353101 Solo _ $259.95 

MSM-353111 Solo w/controller _$319.95 

Super Flve Drive 

A superb quality, half-height, super 
quiet, completely compatible drive for 
your Apple ll/+/e Controller will 
automatically boot DOS 3.2 or 3.3 

IOD-2250A Super 5 drive _$349.95 

IOD-2251A Controller _ $ 74.95 

Vista Quartet Dual low profile slimline 
5y 4 " drives give you thè capacity or 4 
standard Apple floppies. Boots and 
runs all Apple software. With controller. 

MSM-354000 _$699.00 

Vista V1200 6 Megabyte Subsystem 

Lowest priced 6 Megabyte System for 
Apple; uses a floppy catridge, allowing 
you to keep duplicates of your valuable 
data. Accesses as fast as a Winchester. 
MSM-351200 VI 200 w/controller _ $1549.00 

MSM-351206 Extra 6Mb cartridges _ 589.95 

Transpak by SSM Full feature 
communication software packages with 
either 300 or 1200 baud modem. Also 
include free or reduced-fee introductory 
packages for The Source, Dow Jones, 
and Dialog. 

IOM-2431A Transpak 1, 300b _$388.00 

IOM-2432A Transpak 2. 300b _ $448.00 

IOM-2433A Transpak 3. 300b _$695.00 

IOD-2442A Transpak 2+. 1200b _ $995.00 

IOM-2443A Transpak 3+, 1200b _$1095.00 

IOM-2430A 300b ModemCard _ _$299.95 


Continental U.S. Inside California 

800 - 421-5500 800 - 262-1710 

For Technical Inquires or Customer Service cali: 

213-973-7707 




Compute while You 

thè Buffer that 


Your computer is a reai whiz 
when it Comes to rime. Like 
you, it works fast. But most 
printers don’t. Most printers 
are slava If you ever have to 
wait for your printer you are 
wasting rime. Valuable rime. 

But with Microfazer, theres 

no more waiting. ^ ~**~ r *' 

Microfazer is 

thè print buri 

fer that frees V 

your compii- I À 

ter. That lets it | w 

work fast. That 

helps you work ^ 

faster, too. 


m 


any data processing environ- 
ment, it s truly thè “any 
computer any printer” buffer. 
With models for any data 
transm ission need. Serial or 
parallel. Or to interface in- 
compatible devices. And 
theres always thè 
J traditional Quad- 
WrewA ram Quality. 

# A 1 he assurance 

Wt you are getting 

thè finest 

I buffer avail- 


THE “ANY 
COMPUTER ANY 
PRINTER” BUFFER 

Microfazer goes with any- 
thing. Print ers. Plotters. 

Even 

modems. 

MM ■ Perfect 


MICROFAZER 
REMEMBERS IT ALL 

Microfazer Stores data from 
your computer in its own 
memory, then sends it to 
thè printer at a rate thè 
printer can handle. And 
Microfazer can be expand' 
ed at any time to meet all 
your future requirements. 
The print buffer that offers 
512 k of memory—a full 
half-megaby te—M icrofazer 
can handle any buffer task. 

Word Processing. 

Accounting. 

Graphics. 









Special version — ~ 

for attaching directly 

to thè popular Epson printer. 


CHRONOGRAPH 


MODEM 


CORPORATION 


A Division of Intelligent Systems 


Circle 234 on Reader Service card. 


4357 Park Drive / Norcross, Ga. 30093 / (404) 923-6666 
TWX 810-766-4915 (QUADRAM NCRS) 













































Pascal 


Practically Pascal 
Part II 


These two handy Pascal file routines can help you 
write your own address hook—or add them to your 
library of useful Utilities. 


P rofessional programmers try 
to write routines in a generai 
fashion, hoping thè routines will be 
usable in more than one application. 
Although this seems like extra work, a 
routine usable in two applications 
saves considerable effort, while a 
routine usable in many applications 
saves enormous effort. Chores like in¬ 
put validation, searching, sorting, and 
data conversion are examples of 
typical cross-application tasks. Pro¬ 
grammers collect routines that ex- 
pedite these tasks into a library, much 
like a craftsman assembles a set of fine 
tools. This helps them write future ap¬ 
plications more efficiently. 

Many of these utility routines can be 
purchased. Ones sold with a source 
(text file) included are thè most useful. 
Those sold as code files are incon- 
venient because they cannot be cus- 
tomized for specific applications or 
examined for programming techniques. 
Relying on sourceless code files to pro¬ 
duce your programs is somewhat dan- 
gerous, since you can never be certain 
about what is happening or what sub- 
tle bugs may be introduced. Truly bug- 
free code, even in commercial quality 
software, is a very rare thing. 

Two files from my routines library 
will be used to implement Program 
AddressBook. You may wish to incor¬ 
porate them into your own library. 
They are called Support.Text and In- 
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by John Stephenson 


put.Text, and are listed in Listing 1 
and Listing 2. 

Support.Text’s most useful part is 
Function Prompt, which processes 
command lines passed to it as a string, 
then returns a user-pressed character 
among a specified legai set of 
characters. It also contains simple in- 
dependent routines for clearing single 
lines on thè screen, executing a delay 
loop, flashing a status message, and 
converting lowercase to uppercase. 


"Procedure INPUT may be a 
good starting point for an 
input processing unit." 


Input. Text is a rather lengthy file 
containing Procedure INPUT, which 
Controls user input, and its sub- 
procedures. Essentially, it prompts 
you to input at a specified location on 
thè screen and keeps you within a 
specified field. It prohibits thè input of 
non-printable characters (i.e., control 
characters), that might have disturb- 
ingeffects. Finally, it justifies thè input 
within thè field boundaries. Procedure 
INPUT (Listing 3) has no provision for 
assigning default values to nuli re- 
sponses (a nuli string will be returned). 

Procedure INPUT deals exclusively 
with string data. If input of other types 


of data is required, then thè string 
returned by Procedure INPUT would 
have to be processed and validated by 
appropriate data conversion routines, 
such as string to integer, string to date, 
string to Social Security number, and 
so on. Procedure INPUT may be a 
good starting point for thè eonstruc- 
tion of an input processing unit. It con- 
sists of four steps that are implemented 
in thè subprocedures: initializing, col- 
lecting characters into a buffer, assign¬ 
ing thè buffered characters to thè call- 
ing program’s string variable, and 
justifying thè input on thè screen. 

Procedure initlnput performs ini- 
tialization. The variable blankString is 
set to StringDefaultLength (80 charac¬ 
ters) by assigning that value to thè zero 
element. Normally this element is con- 
trolled only by thè System. If range 
checking is not disabled momentarily 
with thè compiler directive ($r-), an 
error would result. The fast built-in 
System routine FILLCHAR Ls used to 
load thè string with all blanks and thè 
response buffer with all question 
marks. Charlndex, which points to thè 
next vacant position in thè input buf¬ 
fer, is set to 1. Endlnput, thè Boolean 
variable used to indicate when thè user 
is done entering characters, is set to 
false. BELLchar, BSchar, and CRchar 


Address correspondence to John C. Stephenson, 
9118 Smith Ave., North Bergen, NJ 07047. 





OUR STANDARD Key WÌZ sa" 


FOR THE APPLE II + . 


P 

□ìhitubi 

hieieibi 

nini n|à|| 




ViSICALC* KEYPAD ) € ,,Q9«' r > 
WITH NUMER1C KEYPAD 

WITH WORD PROCESSOR 

• Apple II +, Ace and TRS-80 Mod III compatible ^ 

• NEW injection molded color coordinated case/v/^ 

• Easy to instali • plugs righi in - no soldering 

• Works for Visicalc (Maglcalc) and listed Word 
Processore 

• Why waste lime memorizing Word Processor or 
“Cale” commands or stringing key strokes together 
when KeyWiz utilizes single key strokes labeled in 
ptain English! KeyWiz makes it all understandable! 

• Òther “program modules" available and more 
coming! 

• Now available with or without numeric keypad 

• Sharply reduces Word Processor training time and 
speeds up Visicalc model construction and data 
entry! 

• 4 arrow keys for full cursor positioning • a great 
asset to any Cale or Word Processor user 

• END USERS: KeyWiz completes your micro com¬ 
puter package 

• DEALERS: KeyWiz makes it easy to sell software 

• EDUCATORS: KeyWiz sharply reduces training time 
and saves you money. 


ALSO...INTRODUCING 
NHE MOST INNOVATIVE 
PERIPHERAL OF 1983 


CURRENTLY AVAILABLE 

I l Applewriter II 
I I Screenwritar II 
I : Super Text 
. Magic Window II 
: Word Star 
i , Executive Secratary 
I : SVS Word Handler 
PIE Writer j 

: Easy Writer 
TRS-80 Mod III 
' iScripsit 


ALSO.. “PROGRAM MODULES” 
FOR YOUR KEYWIZ convertible 

to Reoesignate thè keys for: 

PASCAL $40.00 

BASIC $40.00 

MANY OTHERS cali for information 
Just plug them in - Includes template overlay. 


KeyWlZ ™CONVERTlBLE i 
FOR THE APPLE II + OR ACE 





ALSO...INTROOUCING 

NEW “Custom Key Module” 

available optionally for $40.00 to all KeyWiz 
83 or KeyWiz Convertible owners. Just return 
our “Request for Custom Key Module” that 
you recerve with your KeyWiz, indicating your 
ccmmand preferences • up to 8 characters per 
keystroke for KeyWiz Convertible or up to 4 
characters per keystroke for KeyWiz 83. Send 
us thè request and we will send you a new 
plug-in module! 

AT LAST...you cao have a custom function 
keypad for that special application or re- 
arrange Our keypad to your liking with thè 
‘Custom Key Module." 


(Very Intelligent Peripheral) 


1 il new now for 

trs-80 

I " Il | | il II ~ Il T J i Model in 

(Available Aprii 15) 


VISICALC KEYPAD AND' 
YOUR FAVORITE 
WORD PROCESSOR 


ORDER NOW 

STANDARD KEYWIZ 83 

Visicalc Keypad w/numerìc Keypad $299.00 
With Optional Word Processor $339.00 

(CHOOSE ONE:_!_) 

Add $8.00 for Shipping/Handling 

KEYWIZ CONVERTIBLE 

For Apple II + or Ace with Visicalc and 
Word Processor 

(CHOOSE ONE:__) $299.00 

Add SB-00 for Shipping/Handling 
1. F or TRS-80 Mod III W/Scripslt $299.00 

ADDITIONAL “PROGRAM MODULES” 

For KeyWiz Convertible 

ì _Apple II + or Ace only 

Moduie(s) Desired_$40.00 ea. 

(includes template overlay) 

Add $3.00 for Shipping/Handiing 

KEYWIZ VIP $439.*° 

□ For Apple' Il +, Ace* (others coming) Comes 
with plastlc Applesoft Basic Template, 

Pascal Template and 2 blanks. 

□ For TRS-80* MQdel III 

Comes with 2 Blank Plastlc Templates 
Add $6.00 for Shipping/Handiing 


THE FIRST USER PROGRAMABLE KEYBOARD 
NO SOFTWARE INTERACTION 

i Stores up to tour (62 Keys) Keyboards that you create yourself with up to 8 characters per key - le..“ then x = !!.etc. 

IT MAKES ALL SOFTWARE PROGRAMS USER FRIENDLY. Program your VIP using our preprinted templates as a guide 
or create your own using thè blank reverse side of thè template and a pendi or marker. 


C OBOL _ 
I PASCAL 


Program Setect Key 


- PROGRAM IT YOURSELF-ANYWAY-ANYTIME - 


B ASIC (inSM"Kh) _ 

| aoPLEWBITEW li. (mFrwh) 




ri? 

Templates 


A. TOUCH PROGRAM KEY 

ON VIP to start programming [pi indicates you’re in program modeon LED 

B. TOUCH DESIRED KEY ON VIP to 1 

be programmaci. 

C. INPUT UP TO 8 CHARACTERS tram 
computer keyboard. 

D. TOUCH PROGRAM KEY AGAIN to fTl LED changes to reflect which 1 of 4 

stop programming. ^ keyboards you’re programming. 

F. TOUCH SHIFT LOCK KEY ON VIP IZD Decimal P° int appena indicating shift. 

G. TOUCH PROGRAM KEY ON VIP and (-A9 ‘‘ P ’ and decima, P?' nt . 

repeat steps B-E. [PJ Indicating that you are programming a key 

H. TOUCH PROGRAM SELECT KEY ... in., 

I. REPEAT STEPS A-G, H tilt all 4 [2J LED *' ?,!!? / V ° ’ th SeCOnd 

keyboards In memory are program keyt> ° ard ° 62 ke y s 


7 Segment I O 
LED r - 


E. REPEAT A-D for all 31 keys 

F. TOUCH SHIFT LOCK KEY ON VIP 

G. TOUCH PROGRAM KEY ON VIP and 
repeat steps B-E. 

H. TOUCH PROGRAM SELECT KEY 

I. REPEAT STEPS A-G, H tilt all 4 

keyboards In memory are program p 
med. li 

BONUS - Reprogram any key anytime 
to suit your needs. even in thè middle 
of Word Processing or your “CALC” 
Program - anytime! 


TURN THE POWER ' OFF and 
when you turo it on again - 
it’s stili there! 


v— Creative Computer Perlpherals Ine. 

Aztec Environmental Center 

1044 Lacey Road, Forked River.N.J. 08731 

THE BIG NAME IN SMAlL COMPUTER PER1PHERALS 


10 DAY TRIAL WITH 
MONEY BACK GUARANTEE 

Full 1 Year Warranty 


Visicalc is a regi st ered trademark of Vtsicorp. 

Apple II is a registered trademark of Apple Computer Ine 
Ace is a registered trademark òl Franklin Computer, Ine. ' 
TRS-80 Is a registered trademark of Tandy Corporation 

ORDERS ONLY 800-225-0091 
INFORMATION 609-693-0002 

DEALER INQUIRIESINVITED 


sssus 


Ci relè 305 on Reader Service card. 


AT THE COMPUTER FAIRE, MARCH 18-20 SAN FRANCISCO 
OR THE 80/APPLE/PC COMPUTER SHOW, APRIL 8-10 IN NYC OR 
THE BOSTON APPLEFESTMAY13-15,1983. 
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procedura clNrLin«(1inenuaber>integer); 

C PROCEDURE TO CLEARA SINGLE LINE ON THE SCREEN DISPLAY > 

const 

ClearToEndOfLine= 29; 
firstLin* » 0; 

lastLine = 23; 

begin 

if(1ineNumberCfirstLine) then 1ineNunberr^firstLine; 

i-f (lineNuaber>lastLine) then 1 incNuobers— lastLine; 

gotoxy<0,1ineNunber); 

write(chr(ClearToEndOfLi ne)); 

end; 

procedure delay (timeiinteger); 

c PROCEDURE TO PERFORH A DO NOTHING LOOP TO KILL TIME > 

ver 

«aiti, 

wait2 s intvger; 

begin 

for waitl:=tiae downto O do for wait2i *wai11 d o w n to 0 do begin end 
end; 

procedure messege<si stringi ; 
const 

meseageLine — O; 

begin 

clearLine(messageLine); 
write (s>; 
delay (48) ; 

c1earLine(eessageLine); 
end; 

procedure upperCase (var chschar); 

l PROCEDURE TO CDNVERT ANY LOWER CASE CHAR TO AN UPPER CASE CHAR J 

begin 

( (ch>=* a' > and (ch<*’z' ) ) then ch**chr (ord (eh) -ord (’a’ )+ord (’A'> ) 
end; 

procedure shiftString (var sistrìng); 

C PROCEDURE TO CQNVERT ANY LOWER CASE CHARS IN A STRINO TO UPPER CASE > 

var 

isinteger; 
cschar; 

begin 
11*0; 

while (i <1ength(s) ) do 
begin 
i i =i ♦1 ; 
c:=sCiJ; 
upperCase(c); 
sCi3:*c; 
end; 

end; 

function prompt (proeptStrìngsstring; allowedscharSet )s char; 

C FUNCTION TO PROMPT FOR A CHAR AMONG A SPECIFIED 
SET, AS INDICATE© BY A PROMPTLINE > 

const 

promptLi ne - 0; 

var 

eh ; char; 

begin 

clearLine(promptLine); 

writettitie ,* 9 , proeptString); 

repeat 

read(eh) ; 
upperCase<eh) 
until (eh in allowed); 
prompt:=ch; 


Lktmg 1. 

Support. Text file. 


are assigned their ASCII values. 
AllPrintables is assigned thè set of 
characters from a blank space to z. 
Finally, thè field area is filled with 
marker characters (dots). 

Function choice retums a character 
generated from thè keyboard for a spe- 
cified set. In thè case of procedure IN¬ 
PUT thè specified set consists of all- 
Printabies plus thè CRchar and thè 
BSchar. Function choice uses thè built- 
ih procedure UNITREAD instead of 
thè built-in procedure READ to avoid 
System filtering; specifically, thè Apple 
Pascal Read procedure converts thè 
CR character into a space character, 
an unwanted conversion in procedure 
INPUT. 

Procedure addlt places a character 
into thè buffer and updates charlndex, 
taking care not to allow input beyond 
thè limit specified by thè parameter 
FIELDSIZE (passed to procedure IN¬ 
PUT by thè calling program). Pro¬ 
cedure backUp removes a character 
from thè buffer and decrements char¬ 
lndex, taking care not to allow im- 
possible deletions beyond thè first 
character. Both these procedures cali 
procedure echo to update thè screen 
display. Procedure endlt recognizes 
thè CRchar as end of input and sets 
endlnput to true, which causes ter- 
mination of procedure INPUT’s char¬ 
acter gathering While loop. 

Finally, charlndex is assigned to thè 
calling program string variable’s 
length byte, and thè fast built-in pro¬ 
cedure MOVELEFT transfers thè 
character buffer into thè string”s text 
bytes. Procedure cleanUp justifies thè 
input on thè screen before control is 
relinquished. 

Coding 

Listing 3 shows thè fully-imple- 
mented program. The program is ex- 
plained proceeding from thè begin- 
ning of thè listing to thè end. 

PhoneRecùrd is a Boolean record; 
that means thè memory space reserved 
for it may be interpreted in two 
distinct ways. Anytime thè program 
mentions a PhoneRecord by calling its 
contents SIZE, it is referring to an in- 
teger, because SIZE has been defined 
in thè record as an integer type. 
Anytime thè program mentions a 
PhoneRecord by referring to its con¬ 
tents as PERSONS, it is referring to a 
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PhoneEntry, because PERSONS has 
been defined in thè record as a Phone¬ 
Entry type. 

PhoneBook is an array of Phone- 
Records. Due to thè dual nature of 
PhoneRecords, elements of thè Phone¬ 
Book array may be either integers or 
PhoneEntries, depending on what 
name thè program calls them. But, 
how is thè program to know what 
name to cali them? 

Two methods can be used: conven¬ 
tion and tag fields. A tag field is an ad- 
ditional field in each record that acts as 
a signpost, informing thè program 
about thè type of contents that will fol- 
low. A tag field was not employed in 
PhoneRecord. Instead, thè convention 
that thè zero element of PhoneBook 
would be handled as a SIZE record 
and thè remaining elements would be 
handled as PhoneEntry records was 


adopted. By this convention, thè num- 
ber of valid entries held in thè array is 
stored conveniently in front of thè en¬ 
tries themselves. 

Since it is easy to remember that thè 
zero element of thè array has a special 
purpose, thè added clarity of tag fields 
is not necessary. Specifically, 
bookt[0].size contains thè active array 
size and bookt[?].persons contains thè 
name and address information about 
thè ?th person. Refer to Procedure 
howMany to see how thè file size is 
displayed on thè screen. 

Procedure paintScreen and proce¬ 
dure Display display thè current work 
record on thè screen. Notice thè use of 
thè constants Indent and displayAt to 
regulate thè horizontal and vertical 
positions of thè display. By simply 
changing these constants, thè display 
position could be easily adjusted. 




NEW Beagle Bros Unlocked Utilities! 

_._, All Beagle Bros disk* are Unlocked and -——- 

^ a I copyable, gMng you thè MOST for your 1 ™ 

Software Dollar. Doni setti# for lessi 




ONLY 

34.95 


UBLE-TAKE 

2-WAY-LIST/MULTIPLE UTILITY 
_ BY MARK SIMONSEN _ 

USTS & CATALOGS SCROLL UP and DOWN, 
maldng Ale names & program lines much easier 
to accesa. Arrow-keys control scroll direction. 
NEW LIST FORMAT lista each program statement 
on new line— FAST program trace/de-bugglng. 

VARIABLE-DISPLAY shows all of a program's 
strings & variables with current values. CROSS- 
REFERENCE shows line nos. on which each vari- 

able/string appears. Better RENUMBER/APPEND 

lets you merge programs (not just end-to-end). 

Applesoft AUTO-LINE-NUMBER as you type. In 
stant Hex/Dec Converter, Program Stats, Cursor 
Eliminate/Redefine. Free Space On Disk... 

(includes Peeks/Pokes Chart) 



APPLE MECHANIC 

SHAPE-WRITER/BYTE-ZAP UTIUTY 
BY BERT KERSEY 


SHAPE EDITOR; Keyboard-draw shapes for hi- 

res animation in your programs. Design Propor- 

tionally-Spaced TYPEFACES with special 
characters. Six fonts on thè disk. Listable demos 

show how to use shape tables to animate games, 

graphics and professional Charts & Graphs. 

BYTE-ZAP: Rewrite any byte on a disk for repair 
or alteration. Load entire sectors on thè screen 
for inspection. Hex/Dec/Asoli displays and input. 
Complete instructions & experiments for making 
trick file names. restoring deleted flles, etc. 

MORE: Useful music, text and hi-res tricks for 
your programs. Educational documentation. 
(includes Peeks/Pokes Chart A Tip Book # 5) 




4315 SIERRA VISTA / SAN DIEGO, CA 92103 
619-296-6400 

“APPLE" is a registered trade mark of You-Know-Who. 


DOS BOSS 

DISK COMMAND EDITOR 


ONLY 

24.00 


BY BERT KERSEY & JACK CASSIDY 

RENAME COMMANDS & ERROR MESSAGES: 
“Catalog' can be “Cat"; “Syntax Error" can be 
"Oops” or anything you want Pro te et your pro¬ 
grams; unauthorized save-attempt can produce 
Not Copyable" message. Al so LIST-prevention 
and one-key program-run from catalog. 

CUSTOMIZE DOS: Change Disk Volume head- 
ing to your message. Omit/ alter catalog file codes. 
Fascinating documentation and tips; hours of 
juicy reading and Apple experiments. 

ANY ONE USING YOUR DISKS (booted or not) 
will be formatting DOS thè way you deslgned it. 
(includes Peeks/Pokes Chart fit Tip Book*2) 




FLEX TEXT 8H 


TYPEFACES 

FOR APPLE MECHANIC zu — 


26 NEW FONTS for Apple Mechanic programs. 
All sizes of fully-editable characters. 

BEAGLE MENU: Display only fllenames you 
want from YOUR DISKS (e.g. only Applesoft or 
only Locked flles) for one-key selection. 

(includes Peeks/Pokes Chart & Beagle Menu Utility) 


EARLY 

MEMORY 

MAP 


70-COLUMN-TEXT WITHOUT HARDWARE 
_ BY MARK SIMONSEN _ 

PRINT VARIABLE-WIDTH TEXT on thè hi-res 
screens with normal Applesoft commands 
[including Htab 1-70). Normal. expanded & com- 
pressed text on sanie screen— no hardware! 

ADD GRAPHICS TO TEXT or vice-versa. Run 
existing programs under Flex Text control. Easy 
to use and compatible with PLE® and GPLE.® 

DOS TOOL IQT® FONT compatibility, or use 
Flex Text fonts. Select up to 9 fonts with ctrl-key 
commands. Print/List/Catalog in any stylel Cus- 
tom TEXT CHARACTER EDITOR included. 

REQUIRES MONITOR, not TV; (includes Peeks/Pokes) 



BEAGLE BAG only 

29.50 


12-GAMES-PLUS ON ONE DISK 
BY BERT KERSEY 


UTILITY CITY 


21 UTILITIES ON ONE DISK 
BY BERT KERSEY 


ONLY 

29.50 


LIST FORMATTER prints each program state¬ 
ment on a new line. Loops indented with printer 
page breaks. A great de-buggeri Al so... 

MULTI-COLUMN cataloga for printouts, auto¬ 
post Run-number & Date m programs, put invisi- 
ble commands in programs, create INVISELE file 
names, alphabetize/store info on disk, convert 
decimai to hex or INT to FP, renumber to 65535, 
append programs, dump text-screen to printer... 

MORE TOO: 21 Programs Total, a best-seller! 
(includes Peeks/Pokes Chart & Tip Book*3) 


COMPARE BEAGLE BAG with any one-game 
locked-up game disk on thè market today. All 12 
games are a blast, thè price is right, thè instruc- 
tions are crystal clear, AND thè disk is copyable. 
You can even change thè programs or list them to 
LEARN, and see wnat makes them tick. 

TWELVE GAMES from thè Applesoft Ace, Bert 
Kersey— TextTrain, Slippery Digita, Wowzo, 
Buzzword, Magic Pack... A GREAT VARIETY of 
games that tap your Anple's flexibility. Excellent 
review in January 83 Softalk (page 148). 

BEAGLE MENU TOO: See "Typefaces" disk. 

(includes Peeks/Pokes Chart & Beagle Menu Utility) 

FRAME-UP only 

HIGH-SPEED DISPLAY UTILITY 29.50 
_ BY TOM WEISHAAR 

MAKE PROFESSIONAL PRESENTATIONS of ex¬ 
isting hi-res, lo-res & text frames. FAST hi-res 
loads in 2‘/r-secondai Pad die or Keyboard-ad- 
vance frames. UNATTENDED SHOWS optional— 
each pie arranged & nre-programmed to display 
from 1 to 99 seconds. TEXT SCREEN EDITOR lets 
vou create b/w text “slides". Add type “live" from 
keyboard during shows. Send copies of presenta- 
tions-on-disk to your friends and associates. 

(includes Peeks/Pokes Chart) 


ProntoDOS + ONLY 

HIGH-SPEED DISK UTILITY 29.50 
_ BY TOM WEISHAAR _ 

Put HIGH-SPEED DOS in your Apple's normal 
memory, Language Card or Ile high-memory— 

Function.Normal Pronto 

BLOAD HI-RES IMAGE.10 sec. 3 sec. 

LOAD 60-SECTOR PROGRAM ... 16 sec. 4 sec. 
SAVE 60-SECTOR PROGRAM ... 24 sec. 9 sec. 

BLOAD LANGUAGE CARD.13 sec. 4 sec. 

(TEXT FILES: No Change) 

BOOT PRONTO disk or your updated disks. 
Create new high-speed disks with normal INIT 
command. Compatible with ALL DOS COM¬ 
MANDS and almost ALL of your programs. 

LANGUAGE CARD or Ile high-memory can hold 
DOS— 10,000 Extra-Bytes of program space! 

MORE DISK SPACE: ProntoDOS frees-up 15- 
extra-sectors per disk, almost one full trackl 
PLUS: Auto-Free-Disk-Space, New "TYPE" Com¬ 
mand displays Text Files, and much more... 
(includes Peeks/Pokes Chart) 

ALPHA PLOT 

HI-RES GRAPHICS/TEXT UTILITY --- 
BY BERT KERSEY & JACK CASSIDY 

DRAW IN HI-RES, on 2 pages. using keyboard 
OR paddles/joystick. View lines before plotting. 
Mixed-colors and reverse [background opposite). 
Fast circles, boxes and ellipses: fllled oroutlined. 

COMPRESS HI-RES PICS TO 1/3 DISK-SPACE. 
Superimpose pages or re-locate any rectangular 
image area anywhere on either hi-res page. 

HI-RES TEXT: Proportional spacing. adjustable 
character size and color, upper & lower case, no 
htab/vtab limits, sideways typing for graphs. 
(includes Peeks/Pokes Chart 
A Tip Book*4) 

GOTO YOUR 

Apple Software 
Store for Beagle 
Bros disks. If 
they don't have 
what you want, j 
teli them to GET 
ON THE STICK 
by phoning 
Beagle Bros. 

619-296-6400, or 
ANY Apple 
SOFTWARE 
DISTRIBUTOR. 


TIP DISK 

100 TIP BOOK TIPS ON DISK 
_ BY BERT KERSEY _ 

100 LISTABLE PROGRAMS from Beagle Bros 
Tip Books 1-4. Make your Apple do things it's 
never done! All programs changeable for experi- 
mentation. Includes our Apple Command Chart 
with ALL Applesoft, Integer & DOS Commands! 
(includes Peeks/Pokes AND Apple Command Charts) 

^^rrrcrr .v... r..li.:.i;..i... n. r-i —. 



RUSH thè following disks by First Class Mail: 
□ Alpha Plot . 39.50 □ Pronto-Plus 29.50 

□ Tip Disk*l . 20.00 

□ Typefaces .. 20.00 

□ Utility City . 29.50 


□ A.Mechanic 29.50 

□ Beagle Bag . 29.50 

□ DOS Boss .. 24.00 

□ Double-Take 34.95 

□ Flex Text... 29.50 

□ FTame-Uo .. 29.50 


□ Add me to mai! list. 

□ I'm already ON it 

AT YOUR APPLE DEALER NOW! 
Or order directly from Beagle Bros- 



Visa/MasterCard/COD, cali TOLL-FREE 
Nationwide: 1-800-854-2003 ext 827 
California: 1-800-522-1500 ext 827 
Alaska/Hawaii: 1-800-854-2622 ext 827 


OR mali U.S.Check. Money-Order or Visa/MC* 

to BEAGLE BROS, l7th-Floor 
4315 SIERRA VISTA SAN DIEGO, CA 92103 


Add 1.50 First Class Shipplng, any-size order. 
Overseas add 4.00. COD add 3.00. California add 6%. 
ALL ORDERS SmPPED IMMEDIATELY 
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Listing 2. Input. Text file. 


procedure INPUT (var yourstring:string; 

x,y,fieldsize:integer; 
justify: justification) ; 


{ 

AN INCLUDE FILE FDR CONTROLLINE USER INPUT 


The type de-fined below must be declared in thè calling program: 
justif ication = (Dont Justi fy, Ri ght Justi fy, Left Justi fy) ; 


> 

const 

type 

var 


Procedure INPUT places fieldsize markings on thè CRT at XY 
coordinates and al lows up to -fieldsize characters input as a string. 
I* justi fy=RightJustify then thè user repsonse is right justi-fied 
in thè fieldsize area. If justify=LeftJustify then thè user 
response is left justified in thè fieldsize area. If justify* 

DontJustify then thè user response is removed from thè CRT. 


marker = '.'; 

StringDefaultLength = 80; 


charSet = set of char; 


charCounter 
response 
BELLchar, 
BSchar, 

CRchar, 
next 

alIPrintables 
charIndex 
end Input 
blankString 


integer; 

packed array C1..StringDefaultLength} of char; 


char; 
charSet; 

0..StringDefaultLength; 
boolean; 

stringCStringDefaultLength!; 


function choice (allowed:charSet):char; 

{ Press a key until it’s among thè allowed character set. > 
var 

CH : packed array CO..13 of char; 

begin 

repeat unitread(2,CH,1,0,12) until (CHC03 in ALLOWED); 

CHOICE:=CHC03 

end {function CHOICEJ; 


procedure echo (C:char); 

{ Display character on thè screen > 

begin gotoxy(X+charIndex—1, Y) ; write(C) end; 

procedure backUp; 

{ Perform a rubout > 
begin 

if not(charIndex>fieldSize) then echo(marker); 
if ((charIndex)>1) then 
begi n 

charIndex :=charIndex-1; 

echo (marker); 

end 

else write(BELLchar); 
end; 

procedure endlt; 

{ Process end of input condi tion > 

begin charIndex :=charlndex-l; endlnput:=true end; 
procedure addlt; 

{ Add a character to thè input buffer > 
begin 

if (charIndex<=fieldSize) then 
begin 

echo(next); 

responseCcharIndex 3 :=next; 
charIndex x =charIndex + 1; 
end 

else write(BELLchar); 
end ; 

procedure c1eanUp; 

{ Justify thè input buffer in thè field area > 

var I,J:integer; 

begin 

case justify of 
DontJustify: 
begin 

blankString:=copy(blankString,1,fieldsize); 

gotoxy(X,Y); 

write(blankStr i ng) 

end ; 

LeftJustify: 

if (fieldsize>charlndex) then 
begin 

blankString:=copy(blankString,1,fieldsize-charIndex) ; 
gotoxy(X+charIndex,Y); 
write(blankString); 
end; 

RightJustify: 

if (fieldsize>charlndex) then r . .. .. . 

Listing continued. 


Procedure openFile reads thè ad- 
dress hook data from disk via thè built- 
in procedure RESET, which automa- 
tically loads thè buffer BOOK with thè 
entire phoneBook array. If no file is 
found, then Procedure openFile cre- 
ates a blank address book file on thè 
disk via thè built-in procedure RE- 
WRITE. Procedure SaveFile writes 
thè address book data to disk via thè 
built-in procedures SEEK and PUT, 
which automatically saves thè buffer, 
including any changes. The 
mechanism of reading a buffer of data 
from disk at thè beginning of a pro¬ 
gram, maintaining it wholly in RAM 
during updates, and writing it back to 
disk at thè end of thè program is effi- 
cient and convenient for small buffers. 
The alternative is to perform frequent 
disk accesses during thè program, 


"As it turns out, 
thè skipping search 
works well." 


slowing down processing. 

Function Locate returns a true val- 
ue if an element in thè phoneBook ar¬ 
ray is found corresponding to a user- 
entered name. The match must be ex- 
act, but a useful enhancement would 
be adding a substring search. Addi- 
tionally. Locate returns thè index of 
thè found element. 

The search algorithm in Function 
Locate skips through thè array in little 
jumps and then backtracks in single 
steps. This algorithm could be changed 
without affecting thè rest of thè pro¬ 
gram, as long as Function Locate’s 
parameter line remains unaltered. 
Perhaps someone has implemented a 
binary search and someone else a brute 
force sequential search. Because thè 
entire buffer is held in RAM and is 
small, differences in algorithmic per¬ 
formance are slight. As it turns out, thè 
skipping search works well. 

The procedures Add, Delete, and 
Search make use of thè variable Entry- 
Isln to define their logie. The address 
book entry on display can be in one of 
three States: blank, changed, or filed. 
The state is stored in thè variable En- 
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The Synetix Industries' SSD Solid State Disk 
Emulator provides complete Plug In emulation 
of either a Single (147 K Byte) or Dual (294 K 
Byte) Disk Drive. The memory board will 
operate in any slot 1 through 7. Total software 
compatability is maintained for ‘APPLE 
DOS 3.3, APPLE PASCAL ‘CP/M. Up to 
seven SSD's may be used depending on other 
peripheral eguipment in use. 

□ Software compatible with ‘APPLE DOS 3.3, 
‘PASCAL, & ‘CP/M operating systems 

□ Automatic copying of Disks into SSD 
Memory 

□ Single Drive 147 K Byte 

□ Dual Drive 294 K Byte 


jf| 1 li 


□ Increase speed up to 1000% 

□ Add up to 2 Megabytes of Solid State 
Memory to thè APPLE 

□ Operates in any I/O slot 1 through 7 

□ Increase reliability by reducing mechanical 
disk drive failures 

□ Requires no external power or 
modifications to thè APPLE 

□ Price competitive with mechanical drives 

□ Reduces space requirements 

Micro Computer 
Product Marketing 

Synetix Industries, Ine. 

15050 NE 95th St., Redmond, WA 98052 
206-885-4215 


Creative Products by Synetix 

Cali Toll Free 1-800-426-7412 


Apple and Apple Dos are trademarks of Aople Computer. CP M Is a trademark of Digital Research. 






For thè authorized Apple dealer nearest you, cali 800-538-9696 (800-662-9238 in California.) 


Apple Computer Ine., 20525 Mariani Avenue, Cupertino, California 95014 


Voi. 1 No. 2 


Fruitful Connections- 


There are more people in more 
places making more accessories 
and peripherals for Apples than 
for any other personal computer 
in thè world. 

Thanks to those people — 
in hundreds of independent 
companies—you can make thè 
humblest 1978 Apple II tum tricks 
that are stili on IBM’s Wxsh List 
for 1984- 

But now were coming out with 
our very own line of peripherals 
and accessories for Apple® Personal 
Computers. 

For two very good reasons. 

First, compatibility. Weve 
created a totally kluge-free family 
of produets designed to take full 
advantage of all thè advantages 
built into every Apple. 

Second, Service and support. 


Now thè same kindly dealer who 
keeps your Apple PC in thè pink 
can do thè same competent job 
for your Apple hard-disk and your 
Apple daisywheel printer. 

So if you re looking to expand 
thè capabilities of your Apple II 
or III, remember: 

Now you can add Apples to 
Apples. 


Gutenberg would be proud. 

Old Faithful Silentype® has now been joined by New Faithfuls, thè 
Apple Dot Matrix Printer and thè Apple Letter Quality Printer. 

So now, whatever your budget and your 
needs, you can hook your Apple to a printer 
that’s specifically de'signed to take advan- 
tage of all thè features built into your 
Apple. With no compromises. 

The 7x9 Apple Dot Matrix 
Printer is redefining“correspondence 
quality” with exceptional legibility. 
With 144x160 dots per square inch, it can 
also create high resolution graphics. 

The Apple Letter Quality Printer, 
which gets thè words out about 33% 
faster than other daisywheel printers 
in its price range, also offers graphics 
capabilities. See your authorized 
Apple dealer for more information and 
demonstrations. Because, unfortunately, all 
: news fit to print simply doesrit fit. 


thè 


Ajoytobehold. 

The new Apple Joystick II is 
thè ultimate hand control device 
for thè Apple II. 

Why is it such a joy to use? 

With two firing buttons, its 
thè first ambidextrous joystick — 
just as comfortable for lefties 
as righties. 

Of course, it gives you 360° 
cursor control (not just 8-way like 
some game-oriented devices) and 
full X/Y coordinate control. 

And thè Joystick II contains 
high-quality components and 
switches tested to over 1,000,000 
life cycles. 

Which makes it a thing of 
beauty. And a joystick forevet 

-s- 























Ljp thè creek 
Iwithout 
k paddle? 

Or kit in space? Or down in 
thè dunaons? 


be hap 
has fin; 
paddi; 
Misteri] 
blisters! 

Ap'; 
game pi 
one reo 
Peop 
excited ai 
hard. 

So we 
rugged. We 
to 3,000; 

them forb 
thè firing 
side for m; 
So 


;ver your games, you’ll 
to know that someone 
come out with game 
uilt to hold up under 
fire. Without giving you 


Hand Controller li 
dles were designed with 
discovery in mind: 
laying games get 
can squeeze very, very 

ide thè cases extra 
ised switches tested 
|life cycles. We shaped 
ling hands and placed 
n on thè right rear 
imum comfort, 
never miss a shot. 


A storehouse of knowledge. 



If you work with so much data and reliability, you need only store 
or so many programs that you find one word of wisdom: 
yourself shuffling diskettes con- Apple, 

stantly, you should take a look at 
Apple’s ProFile™ thè personal 
mass Storage System for 
thè Apple III Personal 
Computer. 

This Wmchester-based 
5-megabyte hard disk 
can handle as much data 
as 35 floppies. Even more 
important for some, it 
can access that data 
about 10-times faster 
than a standard floppy 
drive. 

So now your Apple 
DI can handle jobs once 
reserved for computers 
costingthousands 
more. 

Asforquality 


Launching pad for numeric data. 



Good tidings for crunchers of 
numerous numbers: 

Apple now offers a numeric 
keypad that s electronically and 
aesthetically compatible 
with thè Apple II 
Personal Computer. ' 

So you can enter 
numeric data 
faster than 
ever before. 

The Apple 
Numeric Key¬ 
pad II has 
a standard 
calculator- 
style layout. 

Appropriate, 


because unlike some other key- 
pads, it can actually function as a 
calculator. 

The four function keys to thè 
left of thè numeric pad should be 
of special interest 
to people who use 
VisiCalc® Because 
they let you zip 
aroundyour 
work sheet more 
easily than ever, 
adding and 
deleting entries. 

With one 
hand tied be- 
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LEARN TO TYPE 
IN FOUR HOURS 


Listing continued. 



LEARN 

totype 

onyour 

conh ,uter 





If you could type you could produce Com¬ 
munications much faster than you do by 
dictating or writing them. You wouldn’t 
have to cali in a secretary and wait for it. 
COMPUTER KEYBOARDING teaches you 
thè full alphabetic keyboard in tour hours. 
After that it is speed all thè way. And you 
won’t be writing in longhand. You will be 
typing your ideas. You don’t know what 
speed is until you switch from handwriting 
to thè typewriter. When you put your ideas 
on thè typewriter, you get legibility. Is it 
worth $10 to switch from handwriting to 
thè typewriter and reduce turn around time 
to zero? Then send $10 postpaid to Dicta- 
tion Disc Company, Dept. L-2, 240 Madison 
Ave., New York, NY 10016 for COMPUTER 
KEYBOARDING. 


begin 

blankString: =copy (blankString, 1, f iel dsize-char Index ) ; 

gotoxy(X,Y); 

write(blankString>; 

far is-1 to charlndex do writefresponseCi3); 
end; 

end {case justificationi); 
end; 


procedure initInput; 

{ Initialize data and variables. 


Display field on screen. > 


Isinteger; 

begin 

{*r-J 

blankStringC03 ;=chr(StringDefaultLength); 

{♦r+> 

fillchar (blankStringE13, Stri ngDef aul tLength, chr (32) ) ; 
f i llchar(responset13,StringDefaultLength,'?' >; 
charlndex*=1; 
endInput:=fal se; 

BELLchar:=chr(7>; 

BSchar s *=chr (8) ; 

CRchar*-chr(13); 
allPrintables;=E’ ’..’z'3; 
gotoxy(X, Y) ; 

for I:=l to fieldsize do urite (marker); 
end; 

{ PROCEDURE INPUT > 

begin 
initInput; 

uhile not(endInput) do 
begin 

gotoxy(x+charlndex-l,y>; 

nexts=choice (alIPrintabies+CCRchar,BSchar3); 

if <next=BSchar) then backUp 

else if <next=CRchar) then endlt 

else addlt; 

end; 

{*r-> 

yourStringE03s=chr(charlndex); 

{*r+> 

if (charlndex>0) then moveleft(responseC13,yourStringt13,charlndex); 
cleanup; 

end (procedure INPUT!; 


Circle 314 on Reader Service card. 


WHAT ARE YOU WAITING FOR ? ? ? f Apple Vìdeo 


Are you tired of waiting for DOS to 
load and save files? Are you tired of 
waiting for DOS to finish so you can 
type again? Are you tired of waiting 
for your printer? When you buy 
Diversi-DOS™, you won’t have to 
wait any more! Here’s why: 

1. DOS speed-up: Apple DOS 3.3 
takes 18 disk revolutions to read a 
single track, whereas Diversi-DOS 
reads or writes a track in just 2 
revolutions. This speeds up file pro¬ 
cessing tremendously (see table). 

2. Keyboard Buffer: Diversi-DOS 
allows you to type at any time, as 
fast as you can, without missing a 
single character. 



APPLE DOS 

DIVERSI-DOS 

SAVEt 

27.1 see. 

5.9 sec. 

LOAD t 

19.2 sec. 

4.5 sec. 

BSAVE* 

13.6 sec. 

4.1 sec. 

BLOAD* 

9.5 sec. 

2.6 sec. 

READ** 

42.2 sec. 

12.4 sec. 

WRITE** 

44.6 sec. 

14.9 sec. 

APPEND** 

21.3 SSC. 

2.3 sec. 

* Hi-r«s screen t 80-sector BASIC program 

** 52-stìctor text file 


3. Print Buffer: Diversi-DOS can use 
a RAM card (16K-128K) to temporari- 
ly save characters before they are 
printed. Thus, your computer won’t 
have to wait for your printer to 
finish. 

4. DDMOVER: Diversi-DOS can now 
be moved to a RAM card for increas- 
ed memory with BASIC programs. 

Diversi-DOS, thè QUADRUPLE utili¬ 
ty, requires a 48K Apple II or 11 + 
with DOS 3.3. A simple, menu-driven 
installation program Is included on 
thè un-protected disk. So what are 
your waiting for? 

Send $30 to: 

Diversified Software Research, Ine. 
5848 Crampton Ct. 

Rockford, IL61111 
(815)877-1343 

Visa/Mastercard accepted 

Apple is a registered TM of Apple Computer, Ine. 


dsr 


BOTI 


Works with all Apple II 
or Apple Ile computers. 

■ Easy to instali 

■ High reliability 

Low price includes: 
Modulator, Video Switch Box 
and 12 feet of cable. 

$9095 

Aei weach 

(NY State Res. add applicatile tax 
Add S3 shipping and handling) 


( ICON 

Computer Corp. 

81 Plymouth Road, Plainview, N.Y. 11803 
516 433-6745 

Apple II and Apple are registered trademarks of 
Apple Computer Ine. 

Dealer Inquiries Invited. 
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Clrcle 56 on Reader Service card 


"Both Add and Delete use thè built-in 
procedures to speedily shift array elements, 
instead of using a For loop/' 


trylsln. Notice, in thè case of a blank 
state, each procedure makes a recur- 
sive cali to complete its task. 

Procedure Add checks that an alpha 
begins all names and will not try to ex- 
tend a full array. Procedure Delete 


asks for confirmation before erad- 
icating valid data. Both Add and Delete 
use thè built-in procedures MOVE- 
LEFT and MOVERIGHT to speedily 
shift array elements, instead of using a 
For loop. 




Listing 3. Implementation. 

L*S+> 


program addrBook; 

{ PROGRAM TO MANIPOLATE AN ELECTRONIC ADDRESS BOOK AND STORE IT ON DISK. > 

const 

ti tl e 

=» 'PHDNE BOOK E1.C3 ’ ; 


maxList 

= ÌOO; 1 


fileName 

= * PhoneBook.Data* : 


nameLength 

- 30; 


addrLength 

= 50; 


numberLength 

- 15; 


noteLength 

= 50; 


indent 

= 5; 


di spiayAt 

* B; 

type 

-[ justif ication 

type needed by thè include file INPUT.TEXT > 


justification 

— (Don t Justify,RightJustify,LeftJustify) ; 


entryState 

= (blankState,changedState,f i 1edState) ; 


charSet 

- set o-f char; 


phoneEntry 

= packed record 


name 

: stringCnameLengthl; 


addr 

: stringtaddrLengthl ; 


number 

: stringCnumberLengthl ; 


note 

end; 

: stringtnoteLengthl ; 


phoneRecord 

= packed record case boolean o-f 


-false 

: (size:integer ) ; 


true 

end; 

* (persons:phoneEntry) ; 


phoneBook 

- packed array CO..maxLi et3 of phoneRecord; 

var 

entrylsln 

: entryState; 


Ti leModi-f ied, 
qui t 

x boolean ; 


command 

: char; 


mainSet 

: charSet ; 


hook 

: file of phoneBook; 


currentEntry 

x phoneEntry; 


currentIndex 

: integer; # 

{*1 SUPPORT .TEXTT 

INPUT .TEXT> 

procedure howMany; 



t PROCEDURE TO 

REPORT TOTAL NUMBER OF ENTRIES IN DATA ARRAY > 

begin 



clearLineU); 


wr itelo 

( ’ t File now has ' ,book''C03. size, ’ entries. 3’); 

end; 



procedure paintScreen; 




PROCEDURE TO DISPLAY AN ENTRY FORM > 

const 

dashLength 

= 60; 

var 

dashes 

: stringe dashLength:]; 

begin 

—> 



j dashesCOl:=chr(dashLength); 

{*r+> 



fillchar<dashesC13,dashLength, ’ >; 

page<output); 


gotoxy(indent,di spiayAt) ; write(dashes) ; 

gotoxy(indent,dispiayAt +2) ; writet'Name: *>; 

gotoxy(indent,di spiayAt+4) ; wri te ( * Address: 

gotoxy(indent,dispiayAt+6) ; write ( ’Phones ’>; 

gotoxy(indent,di spiayAt+8)s write (’ Note: ’>: 

gotoxy(indent,di spiayAt+lO) ; write(dashes) ; 

end; 



procedure display; 


C 

PROCEDURE TO DISPLAY THE CONTENTS OF CURRENT ADDRESS BOOK ENTRY > 

begin 



paintScreen; 


gotoxy(indent+10,di spiayAt+2) ; write(currentEntry.name) ; 

gotoxy(indent+10,displayAt+4) ; write(currentEntry.addr) ; 

gotoxy(indent+10,di spiayAt+6) ; write(currentEntry*number >; 

gotoxy(indent+10,di spiayAt+8) ; write(currentEntry.note) ; 

end; 


Listing continued. 



AMPERGRAPH is a powerful, easy-to-use graphics 
utility for thè Apple II Plus. AMPERGRAPH adds 
twenty-two Applesoft commands that allow ef- 
fortless generation of professional-looking plots of 
scientific or financial data. All of thè nedessary scal- 
ing and screen formatting is accomplished with just a 
few, simple Applesoft lines. 

Unlike most other plotting systems for thè Apple II 
which are stand-alone systems, thè AMPERGRAPH 
utility provides extended BASIC graphics language 
macros that you can use directly in your own Ap¬ 
plesoft programs. The additional commands are 
& SCALE, &LIMIT, &AXES, &GR1D, &FRAME, &LOG X, 
&LOG Y, & LABEL AXES, & LABEL, &VLABEL, 
&CENTER LABEL, &CENTER VLABEL, &DRAW, 
&PENUP, &CROSS, &OPEN SQUARE, &CLOSED 
SQUARE, &OPEN CIRCLE, &CLOSED CIRCLE. 
&ERROR BARS, &DUMP (to dump thè graph on a 
Silentype printer) and fc'DUMP (to link with 
AMPERDUMP, see befow). 

AMPERGRAPH uses thè Applesoft ampersand 
machine language jump vector to link to a relocatable 
9K routine which normally resides above thè second 
page of high-resolution graphics in thè Apple II Plus. 

SAMPLE AMPERGRAPH PROGRAM LIST1NG: 

10 &SCALE, 0,80, 80, 13000 
15 LX$ = “TIME (SECONDS)“:LYS - "VELOCITY 
(CM/SEC)” 

20 &LOG Y:&LABEL AXES, 10,10 
25 LABEL$ = “VELOCITY VS. TIME”:&LABEL. 30. 
200 

30 FORT = OTO80:&DRAW, T, 150 + TI2.NEXTT 
35 FORT = 10TO70STEP 10 
40 &CLOSED SQUARE, T, 

(150 + T12)*(.8 + .4*RND(3) ) 

45 &ERROR BARS, 5, TT2/2 
50 NEXTT:&DUMP 



TI NE (SEC0NDS) 


AMPERDUMP is a high-resolution graphics dump 
utility which was written specifically to take 
advantage of thè graphics features of thè Epson MX- 
80 and MX-100 printers (MX-80 must have thè Graftrax 
conversion). AMPERDUMP offers many features 
which are not available in other graphics dump 
routines: 

* Three horizontal magnifications (2.33, 4.66 and 6.99 
inches wide) 

* Nine vertical magnifications with thè MX-80 (0.88, 
1.77, 2.64, 3.78, 4.25, 4.45, 5.31,5.87, and 7.96 inches 
high); and three vertical magnifications with thè 
MX-100 (2.64, 5.31, and 7.96 inches high) 

* Horizontal and vertical magnifications can be 
specified independently to produce 27 different 
plot size formats with thè MX-80. and 9 different 
formats with thè MX-100 

* Normal/I riverse dumps * Fast 

* Adjustable horizontal tab * Easy to use 

* Compatire with AMPERGRAPH * Relocatable 
The AMPERGRAPH and AMPERDUMP graphics 
Utilities require and Apple il Plus (or Apple II with 
language card) with 48K and DOS 3.3 The 
AMPERDUMP utility requìres and Epson MX-80 with 
Graftrax, or an MX-100, and one of thè following 
interface cards: Epson, Apple, Grappler, Interactive 
Structures, or Mountain Computer. 

AMPERGRAPH and AMPERDUMP are available from 
your dealer for $30.00 each, or order direct. Include 
$1.50 for shipping and handling; Wisconsin residents 
add 4% sales tax. 



P.O. Box 9822 
Madison, UJI 53715 

®® 608-238-4875 55 
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Acceptance—Testing and Installing 

Program AddrBook must be tested 
for conformance to thè originai defini- 
tion composéd in thè planning stage. 
All options and screens must be dem- 
onstrated. Testing these options should 
not be performed by thè project pro- 
grammer, but by people who will put 
thè product through its paces as dose 
to thè live environment as possible. Of 
course, any professional programmer 
will test personally all modules before 
releasing them. But, thè best tester is 
thè knowledgeable user who takes 
demonio glee in making other people’s 
systems fail. Challenge a sadistic friend 
to find something wrong with a perfect 
program. 

Checking for predicted outputs tests 
Program AddrBook. These tests should 
be independent and self-contained. 
For example, is thè entered data accu- 
rately displayed on thè screen? Is it in- 
serted in correct alphabetical order? 
Does thè printed report correspond 
with thè screen listing report? And so 
on. In a formai situation, tests are 
written recipe style and summarized in 
a pass/fail checklist. 

If a test uncovers a bug, then assume 
its fix will have a rippling effect on thè 
rest of thè program. The fix may churn 
up other bugs previously undetected. 
Test repeatedly to combat this. What- 
ever bugs are missed during testing 
will eventually emerge with unpleas- 
ant results during live operation. Valid 
data could be lost. 

After it survives thorough testing, 
prepare Program AddrBook for release 
by creating a turnkey disk. Initialize a 
fresh disk and name it PHONE:, or 
whatever name seems meaningful to 
you. Transfer thè files SYSTEM.AP¬ 
PLE, SYSTEM.PASCAL, SYSTEM.- 
MISCINFO, and SYSTEM.LIBRARY 
to thè new diskette. Transfer thè 
.CODE file created by thè compiler 
from your Program AddrBook .TEXT 
file to thè new diskette, but cali it 
SYSTEM.STARTUP. Now boot thè 
new diskette and Program AddrBook 
will run automatically. 

Program AddrBook won’t replace 
thè address book some people carry 
around, but it might be a handy substi- 
tute for thè desktop variety. I 
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Listing contìnued. 

procedure clearEntry; 

i PROCEDURE TO CLEAR THE CURRENTLY DISPLAYED ENTRY > 

begin 

entrylsln:=blankState; 

-f il Ichar (currentEntry,sizeof (phoneEntry),O) ; 
page(output); 
display; 
end; 

procedure openFile; 

C PROCEDURE TO OPEN OR CREATE A DISKETTE PHONEBOOK FILE > 

var 

io : integer; 

eh : char; 

procedure abort (ioErrrinteger); 

<■ PROCEDURE TO HANDLE ABNORMAL TERMINATION CONDITIONS > 
begi n 

page(output); 
wri tein; 

writeln ('Trouble 1 coking for 9 , f i 1 eName); 

writein <*I/0 error # T ,io, Program terminated. 9 ) ; 

writeln (’Consult Pascal manual. 7 ); 

exit(program); 

end; 

begin 

clearLine(O) ; 

writein( 7 Loading 9 , f i leName, 7 -from prefixed disk. 7 ): 

r eset(book,fi1eName) ; 
io:=ioresult; 
if(ioOO) then 

if(ia<>10> then abort(io) 
el se 

begin 

eh:=prompt(’Create new phone file? Y/N 7 ,n 7 Y 7 , 7 N 7 3); 

if(chO'Y') then exit(program); 

writeln; 

writeln ('Creating new phone file. 7 ); 

rewrite(book,fileName); 

io:=ioresult; 

if(ioOO) then abort(io); 

filiChar(book^t01«sizeof CphoneBook),0); 

seek(book,0); 

put(book); 

dose (book, lock) ; 

reset(book.fi1eName) ; 

end; 

t*l+> 

clearEntry; 

end; 

procedure saveFile; 

. { PROCEDURE TO SAVE THE ADDRESS BOOK TO DISKETTE > 

begin 

clearLine(l); 

write < * Saving file. »); 

seek(book,0); put(book); close(book,1ock); 
clearLine(1); 

writeln ('File now saved. 7 ); 
end; 

function locate (key:string; var index!integer): boolean: 

{ FUNCTION TO SEARCH FOR A NAME IN THE ADDRESS BOOK. 

RETURNS TRUE IF FOUND DR FALSE IF NOT FDUND. 

RETURN INDEX OF ITS ALPHABETIC POSITION IN THEARRAY OF ENTRIES. } 

jumping, 

foundlt, 

stiliLooking : boolean; 

jumpSize, 

1 i mit, 
position, 

anchor s integer; 

begin 

foundlt:=fal se; 

position:-l; 

stili Lookjng:=true; 

jumpSize:=3+(book^COl.size div 7); 

if(book~C0J.size<1) then { thè fila is empty, so > 
begin 

sti11 Looking:=fal se; 
jumping:=fal se; 
end 

else jumping:=true; 
while(jumping) do 
begin 

position z —posi tion+jumpSize; 
if (position^ook^EOl.size) then 
begin 

pos!tfon^ook°" 0 V?s!ze;°' array a " d StDp sklp P in 9 forward > 

jumping:=fal se; 

end; 

if(key^book^CpositionJ.persons.name) then 
begin 

£ found a match 5 
jump1ng:=f al se; 
sti 11 Looki ng: =f al se; 
foundlt:=true; 
end 

else if(key<book^Epositionl.persons.name) then 
begin 

Listing contìnued. 
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is Speeding up The Apple! 


The DOS Enhancer (TDE) 
works up to 500% faster than 
standard Apple DOS 3.3...$69.95 

TIRED OF WAITING . ..foryourprogramstoloador 
save? Then S&H’s TDE, licensed by Apple, is thè 
answer. 

TDE program updates standard Apple DOS 3.3 disks — or creates 
copyable TDE disks — with TDE's QuickDOS and Quick-load features. 

TDE’s QuickDOS runs and saves BASIC and binary programs up to 
5 times faster* and is completely compatible with standard Apple DOS 
3.3 programs. And — just added — text file Quick-read and write!” 

TDE “Quick-loads" thè RAM card with FPBASIC/INTBASIC, 
QuickDOS or user program in 1.7 seconds at startup. 

tde “package" includes utility disk, training/support disk, step- 
by-step instruction manual, S&H’s Supercat/menu, and multidrive 
“Quick-copy" program. 

TDE System requirements: 48K Apple ][ or ][+, ROM/RAM card, DOS 
3.3 and one or more disk drives. 

Here’s what thè critics say: 

• John Mitchener of PEELINGS II: "The speed increase with TDE is 
awesome and is probably worth thè price of thè program alone, without 
a il ^fi 0 other features ” 

• Chuck Carpenter of INFOWORLD: “Results ina disk that will boot— 
very fast — in any Apple System.” 

*To achieve speeds even faster than a hard-disk drive, combine TDE with Axlon's RAMDISK 320K 
Memory System. 


• Val Golding, Editor of Call-A.P.P.L.E.: "(TDE) stands as a shining 
exampleof how utility and application programs takeinto accountevery 
possible system configuration.” 

• Clark Congleton of The Apple Orchard: “The Quick-load capabilities 
will make this package attractive to anyone who spends a lot of time at 
thè keyboard.” 

Amper-Sort/Merge (A-S/M II) 
works up to 1000% faster than even 
VisiCorp’s VisiFile program...$69.95 

Now "UNPROTECTED," to allow user-modification to 8", RAM disk, or hard-disk 
drives. 

A-s/M li is thè fastest “file clerk” you’ve ever met. Of all thè sort 
Utilities developed to manage Apple ][ data files none does thè job nearly 
so fast as A-S/M II! 

A-s/M ll’s new features include: S&H’s superfast VisiFile index 
sort (callable from within VisiFile for effortless use), an equally fast S&H 
random access file index sort, and parameter file editing. 

A-S/M II can sort/merge from one to five unsorted files into a single 
file of up to 125K in size per disk. 

A-S/M ll’s “package” includes: utility disk, training disk, step-by- 
step instruction manual, and S&H’s new Supercat/menu. 

A-S/M ll’s system requirements: 48K Apple ][ with ROM or RAM 
card or 48K Apple ][+ with DOS 3.3 and Disk II. 


Dealer inquiries invited. 

Apple is a registered trademark of 
Apple Computer. Ine . 




S&H 

Software 


Available from your dealer. Mail Order: Send checks to S&H Software, 58 Van Orden Rd., Harrington Park. NJ 07640. 201-768-3144. 


Credit Cards: Phone Cybertronics International at 212-532-3089 
(Overseas Airmail: Add 510.00 postage and handling.) 
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Listing continued. 

i may bave passed it > 
jumping:=false; 
end 

else if <(key>book^Cpositieni.persons.name) 
and(position=book^C03.size) )then 
begin 

C it gets added to thè end of thè file J 
jumping:=false; 
positioni=book^C03.size+1 ; 
sti 1 ILookingr-false; 
end;. 

end; 

anchor:=position ; 

while<(stiULooking=tr-ue) and <foundtt=false)) do t check skipped entries > 
begin 

i f (posi tion=l ) then -C beginning of array reached, so J 
sti 11 Looking:-false 

else -C check previ ous entry > posi tiene «posi tion -1 ; 
if (key=book^Cposi tieni.persons.name) then foundIt:=true 
else if(key>book^Cposition3.persons.name) then 
begin 

positions-position+ 1 ; 
sti 1 lLoòking:=fal se; 
end; 

if(posi tion-(anchoi—jjumpSize)) then sti llLooking:=f alse; 
end; 

1 ocate:-foundlt; 
index:=position; 
end; 

procedure getKey; 

C USER INPUTS NAME KEY J 

const 

prompt = *KEY QN WHAT NAME: 

var 

key : string; 

begin 

clearLine( 1 ); 
write (prompt); 

input (key, 1 ength (prompt) +1, 1, nameLength, 1 e-ftJustif y) ; 
shi-f tString (key) ; 
currentEntry.name:=key? 
entrylsln:=changedState; 
end; 

procedure modi-fyName; 
var 

temp : string; 

begin 

input (temp, i ndent+10, di spi ayAt+2, nameLength, left Just ify) | 
shi-f tString (temp) ; 
currentEntry.name:=temp; 
entrylsln:=changedState; 
end; 

procedure modifyNumber; 
var 

temp: string; 
begin 

input(temp,indent+10,di spiayAt+ 6 ,numberLength,1 e*tJustify); 
shiftString(temp); 
currentEntry.number:=temp; 
entrylsln:^changedState; 
end; 

procedure modifyAddress; 
var 

temp:string; 
begin 

input(temp,indent+10,di spiayAt+4,addrLength,1eftJustify); 
shiftString(temp); 
currentEntry.addr:=temp; 
entrylsln:=changedState; 
end; 

procedure modifyNote; 
var 

temp:string; 
begin 

input(temp,indent+ 10 ,displayAt+ 8 ,noteLength,leftJustify >5 
shiftString(temp); 

currentEntry.note:=temps 
entrylsln:-changedState; 
end; 

procedure add; 

C PROCEDURE TO ADD A NEW ENTRY TO THE ADDRESS BOQK > 

var 

newlndex : integer; 

c : char; 

found : boolean; 

procedure checkName; 
var 

nameOK : boolean; 

procedure abortAdd; 
begin 

message(’Invaiid name. Add operation aborted.*); 
clearEntry; 
exit(add); 
end; 


Add operation aborted.’); 


begin 

repeat 

if ( 1 ength (currentEntry.nameXl) then abortAdd; 
nameOK:=(currentEntry.nameC13 in C’A’.e'Z’l); 
if not(nameOK) then delete(currentEntry.name,1,1); 
unti1 (nameOK); 

end ; Ti.tìn, 



BAM-128 

Q-DISC 

MAGNUM-80 

VISI-PAC 


RAINBOW-256 


BAM-16MM 


VIZ-E-EXPAND 


Listing continued. 
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FOR APPLE/FRANKLIN & other 
"Utek-a-Ukes" (APPLI Ile Comportile) 

DUMPLING-GX Hi-Resolulion Graphics Paralisi 

Printer Interface Card with 
Graphics Features far all major 
prime rs 

DUMPLING-64 64K Spooler Buffer far Text, Block 

and Dot Addressable Graphics. 
Works with all major printers 
BAM-128 64K/128K Memory Cord 

Q-DISC 128K Disc Emulotion Sysfem 

MAGNUM-80 80 Column Video Cord 

VISI-PAC A BAM-128, a MAGNUM-80, and 

Software for maximum use of 
your VISICALC Spreadsheet 

RV-611C 7 or 8 BIT Paraliel Printer Inter¬ 

face Cord 

RAINBOW-256 RGB Board with 256 Output Col- 
ors to monitor 

BAM-1&MM I6K Card with Memory Manage¬ 
ment System (MOVE-DOS) 
VIZ-E-EXPAND Visìcolc Expansion Softwore 

VIZ-E-EXPAND 80 Adds 80 Column Features to 
VIZ-E-EXPAND 
FOR me IBM PC 

The HAL Series of IBM compatire memory boards: 
HAL-64, 128, 192, 256 Memory Expansion 
without Parity 

HAL-64P, 128P, 192P, 256P Memory Expansion 
with Parity 

The HAL Paraliel Printer Cables 
The HAL Utility Software Package 

INC WC-20 and COMMODORE 64 

VIM-8/16 8K or 16K Memory Expansion 

Module 

VIM-0 EPROM/RAM User Definable 

Module 

CC-2064 Paraliel Printer Cable & Software 

for thè VIC 20/64 

FORATAFU 400 end 800 COMPUTER* 

AMB-16 16K Memory Card for Alari 

AMB-32A 32K Slot Independent Memory 

Card 

ATC-P Atari Paraliel Printer Cable 

ATC-S Atari Serial or Modem Cable 

ALSO 

SCAMP SERIES RS-232C Serial Interface Cables 

6', 10', 25’ 

NEW! 

• Stand-alone Printer Buffers with Auto 
Serial/Parallel Conversion up to 256K! 

• Serial Dumplings—with and without Buffer. 

MICROTEK produci! carry a 2 Vear Warronty and are avoilable 
tram your locai Dealer. For your Dealer'! name or for further 
delaik coll MICROTEK. 

MICROTEKinc. 

9514 Chesapeoke Drive 
San Diego, CA 92123 (619) 569-0900 
Toll Free Outside CA 
(800) 854-1081 
TWX 910-335-1269 

BAM-16, DUMPLING-GX, DUMPLING-64, HAL, 
MAGNUM-80, Q-DISC, RV-611C, and SCAMP are 
trademarks of Microtek, Ine. APPLE and APPLE II 
are registered trademarks of Apple Computer, Ine. 
ATARl 400 & 800 are trademarks of Atari, Ine. 

CP/M is a registered trademark of Digital 
Research, Ine. IBM P.C. is a trademark of IBM. 
VIC-20 is a trademark of Commodore Business 
Machines. VISICALC is a trademard of VisiCorp. 
Z-80 is a trademark of Ziiog, Ine. © Microtek, 1983 





IF YOU HAVE A GRAPHICS 
PRINTER YOU MUST HAVE A 
GRAPHICS INTERFACE. 


GRAPHICS PRINTER INTERFACE 

The Dumpling-GX is a DIP Switch Selectable 
Dual Hi-Resolution Graphics Screen Dump 
parallel interface card for Apple computers 
and most popular printers. 

At thè flick of thè DIP switch, The Dumpling 
will interface with: APPLE EPSON NEC 
IDS* ANADEX C-ITOH PMC CEN¬ 
TRONICS OKIDATA MANNESMANN 
TALLEY 

Selectable Strobe and Acknowledge polar- 
ities allow use with any 8-bit parallerprinter in 
text and block graphics mode. 

Microtek's proprietary on-board firmware en- 
ables thè Dumpling-GX to establish intelligent 
communication between your Apple computer 
and your printer. Simple commands allow: 
Selection of your printer by DIP switch. 
Selective Dump Page 1, Page 2, or both in 
either text or graphics mode. 

Chart Recorder Simulation. 

Left & Right Margin Control. 

Line Length/Page Length Selection. 

Block graphics via 8th bit Control. 

Printer bell Control. 

Skip over Perf. 

90 degree Rotation. 

Doublé Size Graphics. 

Emphasized Graphics Print. 



*Wi»h special PROM and coble. 


GRAPHICS PRINTER SPOOLER 

The Dumpling-64 is thè next logicai extension 
to thè industry standard Dumpling-GX para¬ 
llel interface card, allowing tne computer to 
DUMP vast quantities of data into thè Dump¬ 
ling-64 for later printina, thus freeing up tne 
computer for additionaltasks. 

The Dumpling-64 allows full use of all Dump- 
ling-GX features. In addition to thè standard 
graphics features, thè Dumpling-64 offers: 

Buffer sizes from 0 K to 64K. User upgrad- 
able. 

Graphics Dumps to Buffer. Page 1 and/or 2. 
Multiple Consecutive Screen Dumps to 
Buffer. 

Software reset to clear Buffer. 

"Space Compression" saves valuable mem- 
ory taken up by 'spaces' in text or spread 
sheets. 

Automatic Buffer Size Recognition. 

Pause while printing-immediate. 

Pause while printing-delayed. 

Résumé printing. 

REMOTE pause-immediate: hooks up to 
telephone, switches—etc. 

Buffer ON/OFF control. 

INSERT text editing capability with Pause 
and Buffer ON/OFF control. 
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cost 


noise pulì 
xirbances in thè 
baseline of your CRT display interfere 
with normal operation by causing errors 
in data transmission. Data errors can 
lead to skewed results, lost time and 
aggravation. 

Prevent this from happening to you 
with The Peach. Each Peach is a solid 
state clamping device with EMI/RFi 
filtering utilizing high speed semi¬ 
conductor technology. Simply plug The 
Peach into any standard 3 wire duplex 
outlet then plug what needs protection 
into it. Each Peach has 3 outlets and 
EEE 587-1980 Guide for 
Surge Voltagès in Low Voltage Power 
Circuits. 
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Compare thè 
ware, software and 
price of our 
a line free from 
The Peach from EPD. 
your locai dealer. 


computer hard- 
with thè 
I opt for 
with 


Electronic Protection 

5 Central Avenue 
Waltham, Massachusetts 02154 
(617) 891-6602 
1-800-343-1813 


You 
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For Seeds... 

it's Burpee 

For Clothes... 

it's L.L. Bean 

For Gifts... 

it's Horchow 

and 

For Software... 
it's Strictly 
t i Soft 
jS| Ware 

If you're tired of 
guessing about what thè 
software does—and when it 
will arrive—let us help. 
Our free, industry-leading 
catalog is crammed with 
information about our full 
line of software, offered at 
sensational prices. Write us 
and find out why Strictly 
Soft Ware is thè mail-order 
leader in price, support, 
and delivery. 


Oar naryéty prie* tra tapar-faw Bat aar 
unaètarfitad tpaeiak maM érteffy fa aar 
eatfmart, ara anMamhla. Ona aiata raatan 
why H payt fa bay tram SfrieHy Soff Watt. 

Strictly Soft Ware 1-800-848-5253 

To receive your free catalog tight 
away, send this coupon to thè address 
below. Do you want our □ Apple or 
□ IBM Catalog? 


STREET 


CITY STATE 

( ) - 

PHONE 

Strictly Soft Ware 
P.O. Box 338 
Granvllle, OH 43023 
Phone Orders & Technical 
Assistane»; 1-800-848-5253 
In Ohio: 1-614-587-2938 



Listine continued. 

if(confirmed) then «rase; 
end; 

end; 

blankState: 
begin 
getKey; 
delet«| 
end; 

end(case); 

end; 

procedure search; 

< PROCEDURE TO SEARCH FOR A DISPLAY A RECORD BASED ON LAST NAME > 

var 

newlndex : integer; 

-found : boolean; 

begin 

case entrylsln of 
changedState: 
begin 

foundi«1ocate(currentEntry.name,newlndex); 
if(found) then 
begi n 

currentEntry*“book^Cnewlndex3.persone; 
currentIndex t-newlndex; 
entrylslm-f iledState; 
di spiay; 
end 

else 

begin 

if ( (found=f al se-) and (entryIsln-ftIedState) ) then hattj 

message('Not found.'); 

clearEntry; 

display; 

end; 

end; 

filedState: 
begin 

clearEntry; 

search; 

end; 

blankStatex 

begin 

getKey; 

search; 

end; 

end{case); 

end; 

procedure modify; 

< PROCEDURE TO MODIFY THE CONTENTS OF AN ADDRESS BOOK ENTRY5 

var 

temp i strlng; 

modifySet t charSet; 

quit t boolean; 

comiand t char; 

begin 

eodifySeti-C'E' # 'N','A','P' # '0','R'3; 
quit ««fai se; 
tempi=''; 
command: * 

prompt('MODIFY Etntire ree N(ame A(ddr P(hon« R(emark Q(uit',modifySet) ; 
case command of 

'E'i begin 

«od 1 f yName ; mod i f yAddr ess ; mod i f yNumber ; mod i f yNo t e ; 

quit:=true; 

end; 

'N’i modifyName; 

'A'i modifyAddress; 

'P'« modifyNumber; 

’R'i modifyNote; 

'Q'i quit:=true; 
end {case); 

add; 

end; 

procedure listi 

{ DISPLAY CONTENTS OF ADDRESS BOOK IN SEQUENCE ON THE SCREEN > 

var 

cancelListingi boolean; 
selection: char; 

indexi integer; 

procedure endList; 
begin 

message('End of hook reached.’); 

index««lf 

end; 

procedure 1istNextItem; 
begin 

if ((book^C0D.si2e»0)or(index>book^C03.size)) then endList 

else 

begin 

currentEntry:-book^Cindex J .persons; 

entrylslni-filedState; 

display; 

index i«index-«-I; 

end; 

end; 

begin 

page (output ) ; Listine continued. 

indexi* 1 ; 
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Circle 315 on Reader Service card. 


Fili Your Basket 

With Educational Management Software 









★ Attendance Management 

★ Class Scheduling 

★ Grade Reporting 

★ Student Data Base 

★ Deficiency Reporting 

★ Computer Literacy 


Apple II, Apple //e, Apple III, IBM PC 
TRS-80 I, TRS-80 III 

Contact Your Locai Dealer or CIMA 
(619)365-9718 

T\ MICRO COMPUTER DIVISION 

ICJ M I _X 55722 SANTA FETRAIL 

SJJ yJTNk Yucca Volley, Ca .92284 


S AVE TIME 

whcn you change or debug an APPLESOFT program! 

YOUR LIFE 


i A Sorted Cross Reference utility, 
i Helps you modify, debug, 
optimize and document 
APPLESOFT programs. 
i Shows where variables, 
referenced line numbers, 
numeric constants and strings 
are used. 
i All info in one 
alphabetized list. 


i Tailor SXR PLUS to 
your needs. 

i Use FULL mode or SEARCH. 
i 40 or 80 column format, 
i Use with standard video, 
a printer or a VIDEOTERM 
card. 

i Requires APPLE ll®/ll PLUS, 
48K, DOS 3.3 (1 drive), 
APPLESOFT. 


Only $39.95 at a locai computer store or directly * from 



Prasek Computer systems, Inc. 


S PO. Box 2427 Santa Clara CA 95051 ™ 

(408) 554-0420 


Dealer Inquiries Welcome 

*Send check or money order. Cali!, residente add 616% sales tax. All Sales Final. 
APPLE II and APPLESOFT are registered trademarks of APPLE COMPUTER INC 
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Fot thè first timo, Amper-Magic makes It easy tot people who don’t know 
machlne language to use Its powerl Now you can attach slick, finished machine 
language routlnes to your Applesoft programs In seconds! And interface them 
by name, not by address! 

You simply give each routine a name of your cholce, perform thè append pro¬ 
cedure once at about 15 seconds per routine, and thè machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 

Up to 255 relocatabie machine language routlnes can be attached to a BASIC 
program and then called by name. We supply some 20 routlnes on this disk. More 
can be entered from magazines. And more library disks are in thè Works. 

These routines and more can be attached and accessed easily. For example, 
to allow thè typing of commas and colons In a responso (not normally allowed in 
Applesoft), you just attach thè input Anything routine and put this line in your program: 

xxx PRINT “PLEASEENTER THE DATE.”; : & INPUT,DATE$ 

&• MAGIC makes it Easy to be Fast & Flexible! 

PRICE: $75 


MACHINE LANGUAGE SPEED 
WHERE IT COUNTS... 

IN YOUR PROGRAM! 


Some routines on this disk are: 

Binary file info 
Delete array 
Disassemble memory 
Dump variables 
Find substring 
Get 2-byte values 
Gosub to variable 
Goto to variable 
Hex memory dump 
Input anything 
Move memory 
Multiple poke decimai 
Multiple poke hex 
Print w/o word break 
Restore special data 
Speed up Applesoft 
Speed restore 
Store 2-byte values 
Swap variables 

Anthro - Digital Software 
P.O. Box 1385 
Pittsfield, MA 01202 


&>Magic and Amper-Magic are trademarks of Anthro-Digital, Ine. 
Applesoft Is a trademark of Apple Computer, Ine. 


413-448-8278 


The People - Computers Connection 


May 1983 èider 117 
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B.P.C. 

P O BOX 74157 / DEPT. IN / LOS ANGELES. CA 90004 
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GET STARTED 
ON THE APPLE IN 
ONLY 30 MINUTES... 

Yes.. . at last, computer instruction is 
available on videotape. 

If thè computer "newcomers" in your family 
are getting discouraged with all thè technical 
books, we have made it easy. We have ex- 
tracted thè most-needed facts and put them 
into an easy-to-understand form. We 
demonstrate how to: 

• Instali Circuit boards and disk drives 

• Instali modems and game paddles 

• Boot up 

• And many more 

Our series of "Introduction to. .." tapes take 
thè mystery out of getting started on thè 
Apple and let thè newcomer begin with con- 
fidence. 

It's as easy as watching televisioni 
Price? Only $60.00. 

Mail and phone orders invited 

Lewis Video Productions 
___ 601 West End Avenue 
=~" New York, N.Y. 10024 
(212) 496-0223 

I want thè □ Apple II plus version 
□ Apple Ile version 
in thè following format: 

□ Beta I □ Beta II □ VHS 





v/SA 


MasterCard and Visa holders order toll free: 

(800) 835-2246, Ext. 35 

Kansas residents cali (800) 362-2421, Ext. 35 
For product information, cali: (212) 496-0223 

(New York residents add applicatile tax.) 


Listing continued. 

cancelListing:=fal se; 

1istNextItem; 
repeat 

selection:= 

prompt('<space> for next item or □(uits’,[ 7 Q* chr(32)3)• 
if <selection=chr(32)) then listNextltem 
else cancelListing:=true; 
until (cancelListing); 
end; 

procedure quitProgram; 

<■ EXIT PROGRAM CLEANLY > 

var 

yesNo : char; 
savelt : boolean; 

begin 

quit:=true; 

ir<entryIsIn=changedState) then 
begin 

yesNo: =prompt ( 7 Save entry below? Y/N ’.C'Y’ 

if(yesNo=’Y 7 ) then add; 

end; 

end ; 

procedure print; 

c SEND PART OR ALL 0F ADDRESS BOOK TO LINE PRINTER AS 

NAME. NUMBER 

LIST. } 


P 

seiect 


: interactive; 

: char; 

procedure printSection(key:char)j 
const 

dot = *. » • 

var 

continue, 

match : boolean; 
where : integer; 

tempstring:stringCnameLengthl; 
keystring:stringi13; 

begin 

keystring:=' 7 ; keystringC13:=key; 
match:=locate(keystring,where); 
if (where <= book~C03.size) then 

if(book^Cwhere3.per sons.nameC13=key) then 
begi n 

writeln(P, 7 < ',key,» >'); 
continue:=true; 

while ((continue)and(where<=book~C03.size)) do 

if (book A [where3.persons.namet13=key) then 
begi n 

filichar(tempstringC13,nameLength,dot) 
tempstr i ng : =book >v C where3 . persons. name: 

C*r-> 

tempstringC03:=chr(nameLength); 

<*r+y 

write(P,tempstring,' '); 
write(P,book^ C where 3.persons.number); 
writeln(P); 
where:=where+l; 
end 

else continue:=false; 

end; 

end; 

begin 
C*I-> 

rewrite(P, 7 printer: 7 ); 

C*I+> 

if (IORESULTOO) then message ( 7 Cannot rewr ite printer! 7 ) 
el se 

begi n 

writeln(P, 7 7 ); 
seiect:= 

prompt ( 7 ,, A"-"Z" for section or <space> all. "O" quits 7 ,C 7 7 .. 
if (select in C 7 A 7 .. 7 Z 7 3) then printSection(seiect> 
else if(select= 7 7 )then for select:= 7 A 7 to 7 Z 7 do printSection 
end; 

dose (P) ; 
end ; 

{ MAIN PROGRAM > 

begin 

fi 1 eModi f i ed: =f al se; 
currentIndex :=0; 
quit:=fal se; 
mainSet:=t 7 A 7 , 7 C 7 , 7 D 7 , 
openFile; 
repeat 

howMany; 
command:= 

prompt( 7 A(dd C(lear D(elete L(ist M(odify P(rint Q(uit S(earch 7 ,mainSet); 
case command of 

7 A 7 : add; 

7 C 7 : clearEntry; 

7 D 7 : delete; 

7 L 7 : list; 

7 M 7 : modif y; 

7 P 7 : print; 

7 Q 7 : quitProgram; 
search; 


7 Z 7 , 7 0 7 3); 
( seiect); 


7 M 7 


7 G3 7 , 7 S 7 3 ; 


end i case}; 
unti 1 (quit); 

if (fi 1 eModifi ed) then saveFile; 
end. 
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Circle 258 ori Reader Service card. 


Circle 93 on Reader Service card. 



Business 

Games 

Utilities 


|k|C%A#ll The Apple users group 
" •• software library bonanza 
at truly affordable prices. For thè first time 
enjoy your Apple to its fullest capacity 
using specially packed disks with over 60 
outstandlng programs each. Not available 
from any other source! 

• Applesoft • 3.3 DOS 

JNC. offers 

^ *"■■■*** lj An extensive variety of interestìng, 

Sj 1 ^ El Lp /useful and entertaining programs 

/ indispensable to thè serious computerist 
/ including: 

Educational • Graphics 

Music • Science 

Data Base • Finance . . . 


Library disks 1,2 & 3 are mixed categories and new 
disks 4 (Games), 5 (Utilities), 6 (Graphics) & 7 (Integer) 
at $59.95 each. Why pay more? 

Order direct from this ad and $ave up to $136. 
Buy disk library package 1,2 & 3 and get a 
special bonus disk FREE — over 260 programs 
for $179.95 + shipping. For best value, get 
all 8 disks for $349, postage prepaid, for over 
530 of our best programs at 65c each! 

Cali now toll free: 1-800-327-8664 
Florida: 1-305-987-8665 - 

6400 Hayes St. 

Hollywood, FL 33024 


If you're serious about VlSlCALC® 
then you should know about 



That's because VIZ-A-CON is thè exciting new 
consolidation System for VisiCalc users. Using your 
VisiCalc database, and without learning a new 
System, VIZ-A-CON will: 

• Perform Consolidations-Automatic roll-ups 

of weeks into months into years, or 
departments into divisions into regions. 

• Allow "What If" Questions in Three Dimensions- 

Get answers at any level of consolidation. 

• Act as a Report Writer-To your VisiCalc data¬ 

base, with word processor interface. 

VIZ-A-CON is another imagination enhancing product brought to 
you by ABACUS ASSOCIATES, (713) 666-8146, 6565 W. Loop S., 
Suite 240, Dept. 11, Bellaire, TX 77401. See your software dealer or 
order directly, (800) 547-5995, ext. 170. Visa/Mastercard accepted. 
Dealer inquiries invited. 

Apple II, II+ , HE, TRS-80 I, III—$ 99 95 + 3.95 S&H 
Apple III, TRS-80 II 12/16, IBM PC--$139.95 + 3.95 S&H 


Circle 213 on Reader Service card. 


With these tools you can really program! 


S-C Macro Assembler, by Bob Sandcr-Ccdcrlof. Combined edi¬ 
tor/assembler includes twenty-nine commands and twcnty directives; 
with macros, conditional assembly, global replace, edit. and more. Pro- 
vides new level of power and performance for beginner and professional 
programmer alike. With 100-page marmai, reference card. S80. 

S-C Assembler II Version 4.0\ by Bob Sander-Cederlof. Combined 
source-program editor and assembler takes full advantage of Apple fea- 
tures. Many useful examples and sample programs in both thè manual 
and disk, assembles up to six thousand words a minute, may assemble 
from source code in memory, or from multiple source files. Older, lower- 
cost versioni fewer features, but stili powerful and practical. $55. 

Source Code for Disk Version 4.0, by Bob Sander-Cederlof. If you 
are serious about understanding assemblea, or you want to make your 
own modifications. this complete commented source code for S-C As¬ 
sembler Version 4.0. on disk and ready to assemble. is for you. Requires 
ownership of Version 4.0 and signed license agreement. $95. 

S-C 6800 Macro Cross Assembler Module. Owners of thè S-C Macro 
Assembler may add thè ability to develop programs for thè Motorola 
6800/6801 /6802 microcomputers by buying this update package. $32.50. 

S-C 6809 Macro Cross Assembler Module. Owners of thè S-C Macro 
Assembler may add thè ability to develop programs for thè Motorola 
6809 microcomputer. Write programs for thè Stellation Mill or thè ESD 
Laboratories Excel-9 with all thè comfort and convenience of thè S-C 
Assembler II. $32.50. 

S-C Z-80 Macro Cross Assembler Module. Owners of thè S-C Mac¬ 
ro Assembler may add thè ability to develop programs for thè Z-80 mi¬ 
crocomputer. Write programs for thè SoftCard or other Z-80 systems us¬ 
ing your Apple and thè familiar, friendly environment of thè S-C assem- 
blers. $32.50. 

S-C 68000 Macro Cross Assembler. Owners of thè S-C Macro As¬ 
sembler may add thè ability to develop programs for thè Motorola six- 
teen-bit Champion microcomputer. Use this cross assembler to pro¬ 
gram thè Digital Acoustics 68000 board or others. $50. 

Apple Assembly Line. Monthly newsletter for assembly language pro- 
grammers, beginner or advanced. Tutorial articles, advanced tech- 
niques, handy utility programs, commented listings of code in DOS and 
Apple ROMs. $15 per year; add $3 for First class postage in U.S., Can¬ 
ada and Mexico; add $13 postage to other countries. All back issucs 
available at $1.50 each plus postage. 


Apple Assembly Line Quarterly Disks. Available to subscribers. con- 
taining source code printed in three consecutive issues of Apple Assem¬ 
bly Line. $15 each in U.S., Canada, and Mexico; $19.50 jvith corre- 
sponding issues of newsletter: other countries add $1 postage. 


Es-Cape. by Bill Linn. Full-function, interactive program editor for 
Applesoft. For painless programming: complete line editor for fast, easy 
changcs; split-screen display; single-key operation: global search and re- 
place; automatic line numbers; keyboard macros; and more. $&) 
Flash! by Laumer Research. Integer Basic compiler tramforms your 
programs into machine language so they run many times faster Op¬ 
tional assembly source code output for use with S-C assemblers Re¬ 
quires Integer in RAM or ROM to edit source programs: noi required 
for compiled programs. Source code of run-time package available. 
Compilen $79; run-time source: $39. 

Doublé Precision Floating Point for Applesoft , by Bob Sander-Ceder¬ 
lof. For thè scientist or engineer who is not satisfied with Applesoft's 
nine-digit precision. With this 2,048-byte machine language augmenta- 
tion package, you can get twenty-one digit precision out of Applesoft 
whenever you need it. Supports +, —, *, /, input , and print. Includes sub- 
routines for standard math functions. $50. 

Disam and X-ref by Bob Kovacs. Symbolic two-pass disassembler 
handles data tables, displaced object code; lels you substitute meaning- 
ful iabels of your choice. An address-based cross-refcrcnce table gives in- 
sight into thè inner workings of machine language programs. X-Ref is a 
line number-based global cross-reference table for complete source 
documcntation. Designed to complement thè S-C assemblers. Both on 
one disk: $45. 


S-C SOFTWARE CORPORATION 
2331 Gus Thomasson, Suite 125 
P.O. Box 280300 
Dallas, TX 75228 

(214) 324-2050 

We accept Visa. MasterCard and American Express. 
Apple is a trademark of Apple Computer. Ine 
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Pascal 


A Pascalian 
Puzzle 


Once thè toast of France, Blaise Pascal 
lives on as Appledom's leading eponym. 
Surely, you and your computer can 
outwit a man dead for 321 years! 


U omputer-involved people all 
recognize Pascal as thè name of 
a programming language. They are 
often surprised, however, to discover 
that Pascal, unlike Basic, Cobol and 
others, is not an acronym, but a 
man—indeed, a man of rare genius. 

The Frenchman Blaise Pascal (1623- 
1662) was both brilliant mathemati- 
cian and fervent religious apologist. At 
thè age of 12 he undertook to teach 
himself geometry, and within four 
years was writing originai papere on 
conic sections that astonished mature 
mathematicians. He went on to be- 
corae one of thè fathere of modem al¬ 
gebra and is credited with thè inven- 
tion, at age 18, of thè first mechanical 
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by Swain Pratt 
Microcomputing Staff 

calculating machine. 

A breakdown of health and a reli 
gious conversion brought Pascal much 
physical and spiritual pain during thè 
last half of his life. He nonetheless re- 
mained active until his death at 39, 
leaving a treasury of mathematical in 
vention and copious notes for a 
religious treatise, later published as thè 
classic Pensées. 

Since Pascal was a master of struc 
ture and form in mathematics, it seems 
most appropriate that a highly struc 
tured programming language now 
bears his name. A couple of examples 
may illuminate thè quality of his 
mathematical thinking and insight. 

At about thè age of 16, Pascal dis-' 
covered and proved a theorem which 
became one of thè cornerstones of pro- 
jective geometry. Simply stated, it 
says: If all six points of a hexagon lie on 
a conic, thè three points of intersection 
of thè three pairs of opposite sides al- 
ways lie on one (straight) line, now 
called thè Pascal Line. (The sides of thè 
hexagon may be extended if necessary.) 

For those of you whose high school 
geometry is rusty, here’s a quick re¬ 
vie w. A hexagon may be defined as a 
piane figure formed of six points (no 
three of them on a line) and thè six 
lines joining them in any order. (See 
examples in Fig. 1.) If thè sides are 
consecutively numbered, pairs of “op¬ 




posite” sides are defined as sides 1 and 
4, 2 and 5, 3 and 6. 

A conic is thè boundary curve of any 
piane section (cross-cut) of a conic sur- 
face. (See Fig. 2.) Figure 3 shows sev- 
eral illustrations of Pascal’s Theorem. 
(The last example—thè degenerate 
case of two straight lines—actually 
was discovered by thè Greek geometer 
Pappus, about 300 A.D.) 

A Triangle’s Secrets 

Although not originai with Pascal, 






FRANKUN’S BAKER’S 

^t^mDOZEN! 


Extras can more than doublé thè price of your per¬ 
sonal computer. Not so with thè Franklin ACE 1200. 
It’s thè professional computer System that includes 
thè extras—and a long list of exclusive Franklin 
features that make it thè most extraordinary value on 
thè market today. 


thè Apple II. And, with thè built-in CP/M card, you 
can run both Apple II and CP/M programs. Franklin’s 
CP/M operates three times as fast as many com- 
peting Systems, drastically reducing processing 
time for most business applications. 


The ACE 1200 has everything you’ll need 
to add a color or black and white monitor, 
modem, printer, back-up disk drive and 
other accessories. You can choose from 
thè enormous selection of Apple programs 
and peripherals because thè ACE 1200 is 
hardware- and software-compatible with 



The Franklin ACE 1200—thè most extraordinary value 
on thè market today. Cali or write today for 
thè name of your locai authorized Franklin 
dealer. 

Franklin ACE is a trademark of Franklin Computer Corporation. 
Apple is a registered trademark of Apple Computer Ine. 
CP/M is a registered trademark of Digital Research Ine. 
VisiCalc is a registered trademark of Visi Corp. 


FRANKLIN 


COMPUTER CORPORATION 


7030 Colonial Highway, Pennsauken, NJ 08109 609-488-1700 
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Figure 2. 

Conio Sections 

a. Circle: cut at righi angle to centrai axis of cane. 

b. Ellipse: cut at any angle , bui passing compieteli/ through cone. 

c. Parabola: cut is parallel to a straight line in cone’s surf ace. 

d. Hyperbola: cut passes through both nappes of cone. 

e. Two straight lines: cut passes through both nappes and verter of cone. 


thè triangular number array in Figure 
4 occupied him extensively and today 
is often referred to as Pascal’s Triangle. 
Even if you’ve never seen it before, a 
thoughtful inspection should reveal 
how each row is derived from thè one 
above it. Once you discover that 
secret, you can add as many rows as 
you please. {But to write any given row 
without thè preceding row to look at 
requires more knowledge.) 

Other properties of Pascal’s Triangle 
are less obvious. For example, thè sum 
of thè numbers across each row is a 
power of two, so you have thè binary 
scale—thè mathematical basis of thè 
digitai computer. Each row read as a 
decimai number (from thè sixth row 
on, you must first perform a carrying 
operation on thè double-digit num¬ 
bers) is a power of 11! 

Even more remarkable is a discov- 
ery Pascal made (spurred by analysis of 
a gambling game!) while investigating 
thè mathematical laws of probability. 
These laws involve Combinations, thè 
study of thè possible ways to choose, or 
combine, a given number of objects— 
or events—out of a total number 
available. 

For example, in how many ways 
can a one-, two-, three-, four- or five- 
person committee be chosen out of a 
group of five people? The answers are, 
respectively, 5, 10, 10, 5 and 1—thè 
last five numbers in thè sixth row of 
Pascal’s Triangle. (You can verify this 
by letting thè letters A, B, C, D and E 
stand for thè five people and listing thè 
possible combinations, taking one-at- 
a-time, two-at-a-time and so on. 

Finally, Pascal discovered that thè 
Triangle clearly displays a link be- 
tween Combinations and thè algebraic 
expansion (raising to powers) of thè 
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binomial a + b, (See Fig. 5.) 

A Pascal-Inspired Puzzle 

Figure 6 presents a triangular puzzle 
for your amusement. The object is sim- 


“... so you have thè binary 
scale—thè mathematical basis 
of thè digitai computer." 


ply to find thè total number of routes 
by which PASCALSTRIANGLE can 
be spelled out, starting at all thè Ps 
and ending at thè only E—thè center 
of thè bottoni row. The solution is a 
number that should be quite familiar 


Pascal’s Triangle 
1 

1 1 
1 2 1 

13 3 1 
1 4 6 4 1 

1 5 10 10 5 1 
1 6 15 20 15 6 1 

1 7 ? ? ? ? 7 1 


Powers of 11 

Powers of 2 

1 = 110 

1 = 2» 

11 = 11! 

2 = 21 

121 = 112 

4 = 22 

1331=11 3 

8 = 23 

14641 = 11 4 

16 = 2 4 

161051 = 11 5 

32 = 25 

1771561=11» 

64 = 26 


Figure 4. Pascal’s Triangle, through the8th 
row. The sum of thè numbers in each row 
yields thè power table of 2 (on thè righi). 
Each row read as a decimai number (with 
necessary carrying from thè 6th row on)isa 
power of 11 (on thè left). 






to microcomputer users. 

A related puzzle might also intrigue 
you. How many different routes are 
there from thè upper left corner square 
of a checker board to thè lower right 
corner square, moving only horizon- 
tally to thè right and vertically down? 
(Do not move diagonally or backwards.) 

If you wish to send in detailed Solu¬ 
tions, inCider will print a few of thè 
most elegant in a future issue. (Profes¬ 
sional mathematicians and math 
teachers, please restrain your- 
selves—we know you can do it!) It 
would be interesting—and appropri¬ 
ate—to see if anyone can write a 
Pascal program to solve these puzzles 
on thè Apple, though that would be a 
bit like using your car to go mail a let- 
ter across thè Street. 

How astonished Blaise Pascal would 
be if he could see today’s descendants 
of his calculating machine. And how 
pleased he might be that his name lives 
on in a programming language! ■ 


(a + b)° = 1 

(a + b) 1 = a + b 

(a + b) 2 = a 2 + 2ab + b 2 

(a + b) 3 = a 3 + 3a 2 b + 3ab 2 + b 3 

(a + b) 4 = a 4 + 4a 3 b + 6a 2 b 2 + 4ab 3 + b 4 

(a + b) 5 = a 5 + 5a 4 b + 10a 3 b 2 + 10a 2 b 3 + 5ab 4 + b 5 

(a + b) 6 = a 6 + 6a 5 b + 15a 4 b 2 + 20a 3 b 3 + 15a 2 b 4 + 6ab 5 + b 6 

Figure 5. The expansion of thè binomial a+ b through thè 6th power. The first and last 
terms of each expansion have coefficients of 1, whichare not written. Putin those l’s, take 
away thè a’s and b’s, and you have thè rows of Pascal’s Triangle. 
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Figure 6. PASCALSTRIANGLE puzzle. 
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SOLID OAK 
SECURITY 

FOR YOUR COMPUTER 



Tebbs Techniques 
Fine Furniture 


combinès thè functional beauty and hard- 
wood security of solid oak office furniture for 
your computer equipment. Spacious interior 
room for desk top computer, terminal, CRT, 
printer and disc drive. Rolltop desks $499.98 
and fiat-top desks $209.99 plus shipping. 

Tebbs Techniques 

EFtne EFuinttule 

P O. BOX 817» PLEASANT HILL, OR 97455 
Phone orders: 1-503-747-1448 

Prices Sub ject To Chance 

\___ J 
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APPLEDEXTEROUS* 



* The ability of an Apple II® computer to perform more than one function 
concurrently when using thè BREM-239D buffered serial interface. With an 
Appledexterous Apple, it is possible to print, compute or write to disk without 
interrupting or losing incoming data. In thè output mode, thè 239D spools data 
either to thè on board printer port or thè serial output channel. The 
BREM-239D is plug compatible with popular serial boards, is easily installed 
and costs only $299.00. What this means is a lot more juice from your Apple. 

TO ORDER OR FOR FURTHER INFORMATION, CALL (714) 739-5020 
BREM ENTERPRISES 15201 Santa Gertrudes Ave. #Y-102 La Mirada, Ca. 90638 
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RGB designs 


MINI TAUR II DISK DRIVE 



HARDWARE AND SOFTWARE COMPATIRLE WITH 

Apple II* Apple 11+*, and Apple 2e* 

Franklin ACE* 1000 and 1200 
Basis 108* 

FEATURES 

100% Compatible With ALL Apple Software 
Half Track and Full Track Accessing Capability 
35 Track and 40 Track Operation 
Band Stepper Provides Faster and More Precise Head Positioning 
Twice thè Storage in thè SAME Space as a Standard Apple Drive 

User Selectible Write Protection Switch Featuring Three Modes 
• Normal Write Protect Operation • Read Only Always Write Protected 
• Write Protect Disable Allows Use of Opposite Side of Diskette 

Color Coordinated to Apple Computers 
90 Day Warranty 1 Year Warranty Optional 

For Dealer and Distributor Information Cali: 

RGB designs 

3375 Woodward Avenue 
Santa Clara, CA 95050 
408/748-0400 


‘Apple, Apple II, Apple II+, and Apple 2e are registered trademarks of Apple Computer, Ine. Franklin Ace is a trademark of 
Franklin Computer Corporation. Basis is a trademark of Basis Incorporated. 
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Apple ll~ 16K RAM 


49 95 



Compatible with Apple Language Card, Z-80 Soft- 
card, Fortran, Pascal and CP/M. Assembled, tested 
and burned-in. With complete instructions and 
schematics. 90 day warranty. 


C.B.E 


3375 Woodward Avenue 
Santa Clara, California 95050 
408/988-4408 


Dealer inquires invited. 


225°° 


5/4" APPLE COMPATIBLE DISK DRIVE 
Shugart SA-390 Mechanism 

Compatible with Apple Language Card, Z-80 Soft- 
card, Fortran, Pascal and CP/M. Matching Apple 
color case and cable. 90 day warranty. 




5%" FLOPPY BOX 
$21.95 or 2/$37.50 

As shown on our drive above. 


APPLE 

SYSTEM SHELF 
$37.50 


(P 




All accessories are color-coordinated to Apple computers. 


PRINTER PEDESTAL I 
80 column — $24.95 
PRINTER PEDESTAL II 
132 column — $47.50 



Amber or Green 




COMPOSITE VIDEO 

MONITORS 


HIGH-RESOLUTION 

- 20 Mhz 


GREEN 9" $129.00 

12" 

$139.95 


AMBER 9" $149.00 

12" 

$169.95 






COLOR MONITORS 

RGB and Composite Video inputs. 
High-Resolution Graphics Capability. 

Open Frame (OEM Style) 

Enclosed Units 

RGB-Host Adapters 

Composite-Host Adapters 

Cali for prices! 
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Review 


Bank Street 
Writer 


A look at a home word processor 
for thè entire family. 


H ey, Dad, this is great!” With this 
excited pronouncement, my 
ten-year-old son offered his unsolicited 
opinion of Broderbund Software’s new 
Bank Street Writer, advertised as a 
home word processor. Quite truthful- 
ly, I was amazed by his statement. I 
have had several word processors lying 
about in my computer room for weeks 
at a time. My son has rarely booted one 
up, and he quickly lost interest with 
thè few he did boot up. Not so with 
Bank Street Writer. 

What makes this word processor dif- 
ferent? And what prompted my son to 
try thè software? For starters, thè 
packaging of thè software leads one to 
believe that thè product can be used by 
thè entire family. Norman Rockwell 
would have been pleased with thè 
painting reproduced on thè package 
cover—a healthy, wholesome Ameri¬ 
can family is depicted. Mom, dad, and 
little sister are all smiles, and thè little 
girl is happily pounding away on an 
Apple computer. Could thè next great 
American novel be hiding within their 
daughter, merely awaiting thè arrivai 
of Bank Street Writer? I wonder. 

Perhaps such a thought seems a bit 
far-fetched, but I have never seen a 
youngster take to a word processor so 
quickly. For a ten-year-old to sit down 
and type for two straight hours is 
amazing. When I asked Kirk how he 
had managed such a task, his simple 
answer was, “I liked using it. And I 
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by Hartley G. Lesser 

understand thè manual.” 

Let’s take a closer look at Bank 
Street Writer. Upon opening thè box, 
you’ll find a 28-page manual and two 
program disks. That’s right, two disks. 
You automatically receive a backup 
copy of thè program disk. For those 
with “technifear,” thè manual is writ- 
ten in a clear and informative style. 
But don’t be surprised if you find 
yourself neglecting thè manual when 
using Bank Street Writer. Many of thè 
screen prompts are self-explanatory. 

The manual first explains how to 
boot up thè Bank Street Writer and 
then deals with accessing thè utility 
program, which is reached by pressing 
thè escape key when thè program is 
loading. This is thè only area of thè 
Bank Street Writer that my son needed 
assistance to complete. Communica- 
tion between thè program and thè disk 
drives and printer are read into thè 
main memory from thè utility pro¬ 
gram, as are thè passwords created to 
protect your files. More on this a little 
later on. 

There are four selections from thè 
utility program: standard value modi- 
fication, listing of data disk files and 
their current passwords, conversion of 
Bank Street Writer binary files to text 
files for telecomputing use or use in 
another program (and vice-versa), and 
quitting thè utility program. By select- 
ing 1, you are presented with thè first 
of two screens for changing thè basic 


values of thè program. Each screen is 
accessed by a press of thè spacebar. 

To change a value, thè letter of thè 
item to be changed is entered. You 
may then input thè new value, press' 
return, and continue to thè next item 
that requires modification. When 
completed, all of thè new values are 
saved on thè program disk. Parameters 
for thè printer slot, (which is thè data 
disk drive), margins for both rough 
and final drafts of your text, top and 
bottom margins, headers and page 
numbers, line feed on carriage returns, 
form feed character shift modification 
or keyboard enhancer card and choice 
of cursor type and keyclick, are all 
modifiable by thè user. 

The standard values that arrive on 
thè disk are fairly universal. Once a 
change has been made to adapt thè 
program to your System, re-entry into 
thè utility program for further changes 
will be rare. I explained this to my son; 
he smiled and informed me that I 
could continue to manage thè utility 
program—he’d do all of thè writing! 

It’s advisable to have initialized data 
disks ready. These may be formatted 
in any manner you wish, or you can 
access thè INIT program from Bank 
Street Writer. However, to access this 
utility, you should become familiar 
with thè method of operation of thè 
word processor. 

To accomplish thè latter, Broder¬ 
bund provides a tutorial program with 





NEW FOR APPLE II 


WILDCABX 



...... ....... 

MAKES BACK-UP COPIES OF PROTECTED SOFTWARE 
QUICKLY, EASILY, WITH JUST A PUSH OF A BUTTON. 



New software locking schemes have rendered even thè latest generation of 
copy programs virtually unusable. Locksmith™, Nibbles Away™ and other 
"Nibble copiers" require complicated parameter settings, much patience and 
great effort to use. More often than not, thè results are disappointing. WILD- 
CARD is different. Rather than copying disks track by track, WILDCARD 
ignores thè disk and any copy protection encrypted on it. Instead, WILDCARD 

takes a snapshot of memory in your Apple® II. 

Now you can make back-up copies 
of protected software with 
thè push of a button. 


□ Hardware copying device... 
push button operation. 

□ Copies 48K memory resident 
software, most 64K software. 

□ No programming experience 
or parameters necessary. 

n Backs up DOS 3.2 and 
DOS 3.3 disks. 

□ Creates DOS 3.3 unpro- 
tected and autobooting disks. 

□ WILDCARD lives in any slot. 
Undetectable by software. 

□ Produces autobooting disk 
in 2 minutes. 

□ Copies are DOS3.3compatible. 


□ Copies become accessible 
for alterations. 

□ Simple, easy-to-use 
software included. 

WILDCARD Utility Disk 1 also 

available, featuring: 

□ Automatic program compres 
sion and BRUN file maker. 

□ Multiple programs can be 
placed on thè same disk. 

□ Recreates basic files to load 
and save. 

□ Files can beplaced on a hard 

disk.and more. 


Software is not copy protected. System requirements: Apple II Plus with 64Kand DOS 3.3 or Apple Ile. Franklin Ace also supported. 
‘Wildcard does not operate with CP/M® or other microprocessor based software. 


Order direct from East Side Software Co., 344 E. 63 St., Suite 14-A, 
New York City 10021, 212/355-2860. Please include $3.00 for 
handling. Mail and phone orders may be charged to MasterCard and 
VISA. N.Y. State residents add sales tax. Dealer inquiries welcome. 


WILDCARD $129.95 
WILDCARD Utility Disk 1 $30.00 


IMPORTANT NOTICE: The WILDCARD is offered for thè purpose of enabling you to make archivai copies only. 
Under thè Copyright Lawyou, as theowner of a copy of a computer program, are entitled to make a newcopy for 
archivai purposes only and thè WILDCARD will enable you to do so. The WILDCARD is offered for no other 
purpose and you are not permitted to utilize it for any other use, other than that specified. 

Apple II is a registered trademark of Apple Computer, Ine. CP/M is a registered trademark of Digital Research, Ine. Locksmith—trademark of 
Omega Microware, Ine. Nibbles Away—trademark of Computer: applications. 
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Figure 1. Write mode. 



<=^ OR C 

, RETURN 


ESC TO WRITE 

TRANSFER ./ClX 

ERASE 

MOVE 

FIND 

UNERASE 

MOVEBACK 

REPLACE 

MENU /j| flO 


Figure 2. Edit mode. 
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thè disk. To enter thè tutorials, remove 
thè disk from thè drive, turn it over, 
re-insert, and reboot your System. 
You’re all set to go. A new menu is 
presented. 

Lesson one deals with thè method of 
entering text in thè Write mode. Les¬ 
son two teaches cursor movement and 
thè manner in which text should be 
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corrected. Lesson three explains thè 
commands ERASE and UNERASE, and 
Lesson four discusses thè MOVE and 
moveback commands. The final les¬ 
son teaches you about using FIND and 
REPLACE. On-screen prompts guide 
thè user deftly through each lesson. Er¬ 
rore cannot be made because thè tuto- 
rial won’t allow you to progress unlcss 


each lesson is followed accurately. One 
slight drawback is that after thè tutori- 
ai begins, you must finish thè work; 
there’s no other exit, other than turn- 
ing off thè computer. Each tutorial 
faithfully duplicates thè conditions 
found on thè main program. Overall, 
thè tutorials are excellent. Not a single 
screen is wasted. And once through thè 
tutorial, there should be little problem 
in running thè Bank Street Writer. 

Bank Street Writer’s manual was 
written for thè Apple II or Apple II 
Plus computer. If you are running this 
word processor on a new Apple Ile, thè 
differences are explained in thè word 
processor’s opening screen and in thè 
tutorial. Most importantly, Bank 
Street Writer is 100% compatible with 
thè Ile, either with or without thè 
standard 80-column text card inserted. 

When using thè Apple II without 
shift modification, thè shift-N pro- 
duces thè desired effect. To produce all 
capitai lettere, shift-N must be pressed 
again. Leaving thè capitai letter mode 
requires a third keypress of shift-N. 
When trying this maneuver on an Ap¬ 
ple II, I found that I sometimes left an 
n or N on thè screen and did not enter 
thè capitai letter mode. It takes a little 
time to become familiar with these 
combination keypresses. 

After removing thè program disk 
and rebooting for thè actual program, 
thè firet screen should look like Figure 
1. This is thè Write mode. Bank Street 
Writer operates just like a typewriter: 
what you type is what you’ll get on thè 
screen. To manipulate your text, you’ll 
need to enter thè Edit mode by simply 
pressing thè escape key. Your second 
screen for thè Edit mode should look 
like Figure 2. 

Note that thè arrows point in four 
directions on this screen. These are thè 
cursor movement arrows, that move 
your cursor in whatever direction thè 
keypress indicates. For example, if you 
wanted to move your cursor towards 
thè top of thè page, strike thè I key. 
This cursor movement is only accessi- 
ble from thè Edit mode. 

If you are operating thè Ile, how- 
ever, these keys do not control your 
cursor movement. Instead, use thè 
cursor direction keys located on thè 
bottom row of your Ile keyboard, 
which are to thè right of thè closed ap¬ 
piè key. An appropriate symbol ap- 



C COMPÌLERS-COMMON FEATURES: 

• UNIX VER 7 compattaility * standard float, doublé, and long support • run tlme library with full I/O 

and source • fast compilation and execution • full language. 

AZTEC C II CP/M (MP/M) $199 

• produces relocatable 8080 source code • assembler and linker supplled • optional M80 Interface • 

SID/ZSID debugser interface • library utility • APPLE requires Z80 and 16K card 

AZTEC CH APPLE DOS $199 

• relocating assembler supplied ♦ APPLE SHELL • VED editor • library and other Utilities 
• requires 16K card 

C86 IBM PC MSDOS CP/M-86 $395 
• dlrectly produces 8088/8086 object code • linker supplied 

Manuals—$30 ORDER BY PHONE OR BY MAIL-Specify products and disk format 


MANX 

software Systems 
Box 55, Shrewsbury, N.J. 07701 (201) 780-4004 


CP/M FORMATS 8" STD. HEATH, APPLE, OSBORNE, NORTHSTAR, OUTSIDE USA-Add SIO In N.J sdd 5% sales lax 






Circle 53 on Reader Service card. 


Circle 43 on Reader Service card. 


DISK DRIVE WOES? __ ^Apat. #4,259.705 

PRINTER INTERACTION? 

MEMORY LOSS? 

ERRATIC OPERATION? \ll IS01 

Biame The * 
Software! 

Power Line Spikes, Surges & 

Hash could be thè culprit! Floppies, printers, 
memory & processor often interact! Our patented ISOLATORS 
eliminate equipment Interaction AND curb damaging Power Line 
Spikes, Surges and Hash, MONEY BACK GUARANTEE! 

• ISOLATOR (ISO-1) 3 filter isolated 3-prong sockets; integrai 

Surge/Spike Suppression; 1875 W Maximumm load, 1 KW load 
any Socket . S76.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-rpong Socket banks; (6 

sockets total); integrai Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank.S76.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except doublé 

isolation & Suppression .$115.95 

• SUPER ISOLATOR (ISO-11 ) similar to ISO-2 except doublé 

isolation & Suppression.$115.95 

• MAGNUM ISOLATOR (ISO-17) 4 Quad isolated sockets; For 

ULTRA-SENSITIVE Systems $200.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $10.00 

• REMOTE SWITCH, any model (Add-RS) Add $18.00 


AT YOUR 
DEALERS 


MasterCard, Visa, American Express 
ORDER TOLL FREE 1-800-225-4876 
(except AK, HI, PR & Canada) 


ISZ Electronic Specialists, Ine. 

171 South Main Street, Box 389, Natick, Mass. 01760 
(617) 655-1532 
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APPLE-COMPATIBLE 

DISK DRIVES 

For Your Apple II 

Drive.$279 

Controller.$89 

Drive Cable Free With Purchase of Drive 

*These are Apple-compatible disk drives and interface cards and are pug- :c r xg oe anc 
identical in function to Apple II equipment Switch selectable 13 or 16 secsx rea. 

15 DAY FREE TRIAL 
SIX MONTHS WARRANTY 

Add $4.00 per drive for shipping in Cont. US. UPS C0D charge SI.50. 
Apple II is a trademark of Apple Computer Ina 

ORDER NOW! 

Write or cali, Toll free lines are for 0RDERS ONLY! If you need technea: r-y~z- 
tion or Service cali 214/337-4346. We accept VISA/MASTERCARO are CCC 
orders by phone. C0D orders will be cash, certified check or money orde? or?, rf 
you order by mail allow 2 weeks for personal checks to clear. Texas rescers add 
5% tax. All stock items are shipped within 24 hours. We do not charge fxi ire;-, 
card until thè day we ship. 

CALL TOLL FREE 

(800) 824-7888, Operator 24 

California diai (800) 852-7?77, Operator 24, Alaska & Hawa da: 
(800) 824-7919, Operator 24. 

TOLL FREE LINES FOR ORDERS ONLY 

Technical information & Service cali (214) 337-4346 

AETCCCmP 

Redbird Airport, Bldg. 8 
P.O. Box 24829 
Dallas, TX 75224 


> BOOKENDS 

The Reference Management System 

Sensible Software would like to introduce you to 

BOOKENDS, a revolutionary new System designed to 

manage your references. BOOKENDS will take thè guess 

work out of hunting for lost articles or information. Think of 

it as a personalized, state-of-the-art catalog System. l=~=, 

Pay for BOOKENDS. And not for your time. y° u for 9 e 
BOOKENDS tracks down articles, magazines, and books BOOKEN 
for you quickly and effortlessly. It even prepares profes- llst °' the 

sional bibliographies for you. If you’ve ever spent time look- BOOKE 
ing for important information, then BOOKENDS is for you. catalog 

BOOKENDS remembers for you. BOOKEN 

The purpose of BOOKENDS is to keep track of information sent you \ 
from articles and books so you don’t have to. BOOKENDS can be pr 
works with your Apple Computer, and is menu-driven for You have 

ease of use. It has a word processor quality editor which including 

supports upper and lower case entry and display, and also bibliograp 
allows you to re-type just your typos, not thè entire entry. When reti 

BOOKENDS allows you to stare thè author, title, journal, sorted by 

volume, page number, date, publisher, and keywords (all Give ui 

up to 255 characters), and an abstract (to 720 characters). Put yoi 

BOOKENDS also permits you to chain your reference files 
together, to contain any number of references you 
might have. 

Eliminate thè guesswork from your search 

BOOKENDS eliminates most of thè guesswork 
from your data search because it finds your stored 
information quickly and effortlessly. References 
can be searched for quickly by author, portions of 
titles, or by thè keywords of your choice. And if 



you target thè keywords or thè author, don’t despair, 
BOOKENDS provides you with a complete, alphabetized 
list of thè keywords and authors in thè data base. 

BOOKENDS is your state-of-the-art card 
catalog System. 

BOOKENDS is particularly innovative because it can pre- 
sent you with professionally produced bibliographies that 
can be printed or used directly with your word processor. 
You have complete control of printouts, from simple lists 
including an abstract, up to professionally formatted, formai 
bibliographies suitable for inclusion in your word processor. 
When retrieving your references, thè bibliography can be 
sorted by author, keyword, or title. 

Give up thè search. 

Put your library in BOOKENDS. $ 124.95 


Sensible. 

4» Software, Ine. 

6619 PERHAM DRIVE 
WEST BLOOMFIELD, MI 48033 
(313) 399-8877 

Copyright 1983 - Sensible Software, Ine. 
APPLE is a Registered Trademark of APPLE 
Computer Co. 
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ESC TOMAIN MENU 


RETRIEVE DELETE PRINT-DRAFT QU1T 

SAVE INIT RENAME PRINT-FINAL CLEAR 


Figure 3. Transfer Menu. 


I 

= Cursor moves up 1 line 

J 

= Cursor moves 1 space to thè left 

K 

= Cursor moves 1 space to thè right 

M 

= Cursor moves 1 line down 

B (for Beginning) 

= Cursor moves to thè start of thè document 

E (for End) 

= Cursor moves to thè end of thè document 

U (for Up) 

= Cursor moves up 12 lines 

D (for Down) 

= Cursor moves down 12 lines 

Figure 4. Cursor movement key presses. 


pears in thè upper right corner of thè 
screen, which simply displays thè cur- 
sor arrows without thè letters I, J, 
K, and M inside. When this Sym¬ 
bol appears, you’ll know you can use 
thè cursor movement keys on you Ile 
easily. 

Another important difference is that 
those using thè Apple II will be using 
their right and left arrows to select thè 
appropriate Edit mode. For example, if 
ERASE is highlighted on screen, and 
you want to find a word, either press 
thè left arrow key twice, or thè right 
arrow key twice, to highlight thè 
desired mode. Striking thè spacebar 
drops thè highlighter from thè top row 
of selections to thè bottom row, or 
vice-versa. 

The Ile functions differently.. Here, 
you must press either your open appiè 
or closed appiè keys to move thè high¬ 
lighter to thè desired mode. The space¬ 
bar works in thè same manner as for 
thè Apple II. Again, these are differ- 
ences not noted in thè manual, but 
they are indicated by on-screen 
prompts in thè upper left corner of thè 
screen and in thè tutorial. 

The third mode is accessed by select- 
ing TRANSFER MENU, followed by a re¬ 
turn keypress. The screen looks like 
Figure 3. Again, depending upon 
which Apple you’re using, thè left and 
right arrows, or thè cursor movement 
keys, as well as thè spacebar, move thè 
highlighter to thè desired selection, or 
prompts. Movement between thè three 
modes is simply a matter of pressing 
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thè escape key. 

If you own thè Apple II, screen 
prompts will remind you to use thè 
left and right arrows and spacebar 
to highlight thè option required. If 
you’re using a Ile, then thè open and 
closed appiè keys and thè spacebar are 
utilized. 

Once in thè Write mode, thè com¬ 
puter becomes a typewriter. Up to 38 
characters can be typed on a single 
line, and there is no allowance made 
for an 80-column board. Cursor move¬ 
ment about thè page is controlled by 
thè left arrow key (which erases previ- 
ously typed text), thè spacebar (for 
moving thè cursor right), and thè re¬ 
turn key. Each move in thè Write 
mode leaves blank character space(s). 
The word processor wraps each line 
automatically, and thè final printed 
product is determined by whatever pa- 
rameters are set up when accessing thè 
printing program. 

Use of thè rept key on thè Apple II in 
conjunction with a letter repeats a 
character. Merely holding down thè 
letter causes automatic repetition on 
thè Ile. Control-I indents 8, 16, 24, 
or 32 spaces, and control-C centers 
all text that precedes a return. Con- 
trol-S tells how many characters you 
have remaining in thè current file. 
For computers with 64K bytes RAM, 
this is about 3200 words, and for thè 
standard Apple II without thè RAM 
or language cards, about 1300 words. 
Not a great deal of Storage space, 
to be sure, but adequate for most 


tasks. Save thè file, clear thè mem- 
ory, and you can continue writing 
a long document. When it comes time 
to print, simply print them one at a 
time. These operations are accessed 
through thè Edit mode. 

All alterations and movements 
throughout your document that don’t 
destroy text are handled through thè 
Edit mode. This requires thè press of 
thè escape key from Write mode. For 
thè Apple II, eight key presses are re¬ 
quired for cursor movement. Refer to 
Figure 4. These key movements are 
easy to remember because they are dis- 
played in hi-res in thè upper right cor¬ 
ner of thè screen. When this illustra- 
tion is on screen, these key movements 
are available for use. For those using 
thè Ile, thè cursor movement keys on 
thè lower row of thè keyboard manip- 
ulate thè cursor, as well as thè B, E, U 
and D keys. 

For those who have used a sophisti- 
cated word processor, thè key presses 
needed with Bank Street Writer seem 
awkward at first. Example: You are in 
thè Write mode and happily typing 
your fifth paragraph, and you realize 
that a mistake has been made in thè 
second paragraph. In order to edit thè 
mistake, you must leave thè Write 
mode by pressing escape and enter thè 
Edit mode. You must then manipulate 
thè cursor to thè specific area, make 
your deletions, press escape to re-enter 
thè Write mode, and type in thè correo- 
tion. This becomes frustrating if a sim- 
ple correction is needed just two lines 
or so above where you are typing. You 
cannot simply move your cursor up- 
wards in thè Write mode and change 
thè errar. This extra step takes a little 
time to get used to. However, once you 
have operated under these conditions 
for a while, it almost becomes second 
nature. 

If you have a paragraph of text that 
needs to be erased, press return to ac- 
cess thè Erase mode. You are informed 
at thè top of thè screen to move thè 
cursor to thè first character of thè 
block of text to be erased. Press return, 
and you’re told to move thè cursor to 
thè end of thè text to be deleted. Press 
return again. As you move thè cursor 
to this point, thè text to be deleted 
becomes inverse, black-on-white. 
When you reach thè end of thè dele- 
tion, press return, and a final query 
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THE APPLE CONNECTION—by James W. Coffron. Con- 
nect your Apple to household appliances for greater con¬ 
trol. With this book you will learn about elementary inter- 
facing and about BASIC programming, including input/ 
output techniques and devices, building reai Systems, 
and even analog to digitai and digitai to analog conver- 
sion. All programs are written in BASIC and no priorelec- 
tronic knowledge is required. BK1262 $12.95 

MICROBOOK: DATA BASE MANAGEMENT FOR THE 
APPLE II—by Ted Lewis. This book provides you with an 
affordable data base management System for your Ap¬ 
ple II. These programs turn your Apple II into a combina- 
tion filing cabinet, information gathering/retrieval Sys¬ 
tem and data processing engine. Written in Pascal, thè 
programs simulate a library. Information is maintained 
and broken down into books, chapters and pages and in¬ 
dex to pages. Photographs of thè Apple II screen are 
abundant, and they show you step-by-step thè effect of 
each of your entries. Microbook can be used for almost 
any application involving thè Storage and retrieval of in¬ 
formation. BK1261 $19.95 


THE CP/M HANDBOOK (with MP/M)-by Rodnay Zaks. 
A complete guide and reference handbook for CP/M— 
thè industry standard in operating Systems. Step-by- 
step instruction for everything from turning on thè 
System and inserting thè diskette to correct user 
discipline and remediai action for problem situations. 
This also includes a complete discussion of all ver- 
sions of CP/M up to and including 2.2, MP/M and 
CDOS. BK1187 $14.95.* 


MASTERING CP/M—by Alan R. Miller For advanced 
CP/M users or systems programmers who want max¬ 
imum use of thè CP/M operating System, this book 
takes up where thè CP/M Handbook leaves off. It will 
give you an in-depth understanding of thè CP/M 
modules such as CCP (Console Command Processor), 
BIOS (Basic Input/Output System), and BDOS (Basic 
Disk Operating System). It explains thè incorporation 
of additional peripherals to thè System, console I/O, 
thè use of thè file control block and much more. It also 
includes a library of useful macros and a comprehen- 
sive set of appendices. BK1263 $15.95 


SOME COMMON BASIC PROGRAMS, APPLE II EDI- 
TION—By Lon Poole et al. A powerful collection of fi- 
nancial, statistical, home management and mathemat- 
ics programs—76 in all. Each program is presented 
with BASIC source code, operating instructions and 
descriptions. If you’re a beginning programmer you 
can learn from this book what well designed and docu- 
mented programs look like. BK1232 $14.99 

THE CUSTOM APPLE AND OTHER MYSTERIES—by 

Winifred Hofacker and Ekkehard Fioegei. This is thè 
guide to customizing Apple software and hardware, pub- 
lished by thè folks at IJG. It contains such hands-on in¬ 
formation such as: data acquisition and control applica- 
tions, Programming thè 6522 Internai timer, Construct- 
ing thè 6522 I/O board, An Eprom Burner for thè Apple 
Computer, An Eprom/RAM board, The Apple Slot Re- 
peater, and much, much more. BK1246 $24.95. 



THE BOOK OF APPLE SOFTWARE-edited by Jeffrey 
Stanton, Robert P. Wells, Ph.D., and Sandra Roch- 
owansky. Are you bewildered by thè thousands of Ap¬ 
ple Il programs on thè market? Here is thè advice you 
need, with descriptions, ratings, and evaluations of 
over 500 of thè most popular programs for thè Apple II. 
You’ll find reviews of business, education, game, and 
utility programs, and advice on hardware options and 
software vendors. BK1265 $19.95. 


APPLE GRAPHICS AND ARCADE GAME DESIGN —by 

Jeffrey Stanton The only book available that explains 
how to design arcade games from start to finish 
through thè use of text, flow charts and working ex- 
amples. Learn how to speed up your graphics, and thè 
theory of how to design a playable game. This book re- 
quires a solid foundation in BASIC programming on 
thè Apple II. BK1259 $19.95 

THE VISICALC BOOK-APPLE EDITION—by Donald H. 
Beil. If you are presently using Visi-Cale on your Apple II 
or want to learn more about its expanded uses, this book 
is for you. It will show you how to build a model, enter 
your data, and begin to explore all of your “what if " ques- 
tions about any aspect of your business. There are also a 
large number of practice problems included in this book 
to help you become a skilled user. BK1268 $14.95 

THE APPLE II USER’S GUIDE—By Lon Poole. Martin 
McNiff. and Steven Cook This guide is thè key to 
unlocking thè full power of your Apple II or Apple II 
Plus. Topics include: Applesoft and Integer BASIC 
Programming —especially how to make thè best use 
of Apple's sound, color and graphics capabilities. 

Machine Level Programming. Hardware Features" 
—which covers thè disk drive and printer, and "Ad¬ 
vanced Programming"'—describmg high resolution 
graphics techniques and other advanced applications. 
Well organized and easy to use. BK1220 $16.95 


THE SELECTRIC INTERFACE—by George Young. You 
need thè quality print that a daisy wheel printer pro¬ 
vides but thè thought of buying one makes your wallet 
wilt. SELECTRICTM INTERFACE, a step-by-step guide 
to interfacing an IBM Selectric I/O Writerto your micro¬ 
computer, will give you that quality at a fraction of thè 
price. George Young, co-authorof Kilobaud Microcom¬ 
puting magazine’s popular “Kilobaud Klassroom" 
series, offers a low-cost alternative to buying a daisy 
wheel printer. SELECTRIC INTERFACE includes: step- 
by-step instructions, tips on purchasing a used Selec¬ 
tric, information on various Selectric models, includ¬ 
ing thè 2740, 2980, and Dura 1041, driver software for 
Z80, 8080, and 6502 chips, tips on interfacing tech¬ 
niques. With SELECTRIC INTERFACE and some back¬ 
ground in electronics, you can have a high-quality, low- 
cost, letter-quality printer. Petals not included. BK7388 
(125 pages) $12.97 



3LK$Sr/35[J 


APPLE BASIC FOR BUSINESS: for thè Apple II—by 

Alan J. Parker and John Stewart. Unlike most introduc- 
tory BASIC books, this book uses files extensively. It is 
written specifically for thè Apple II microcomputer 
with DOS Version 3.2. All programs presented are com- 
patible with DOS Version 3.3. With thè emphasis on 
problem-solving, thè focus of this book is thè point at 
which problem elements meet language capabilities. 
BK1247 $15.95 

ASSEMBLY LANGUAGE PROGRAMMING FOR THE 
APPLE II—by Robert Mottolz. This comprehensive. 
easy to understand introduction provides solid 
groundwork for getting started in assembly language 
programming on thè Apple II.* Many subroutines writ¬ 
ten in assembly language are provided, and most ex- 
planations are shown with equivalent examples in 
BASIC. There’s an excellent section on hexadecimal 
arithmetic included, as well as appendices for further 
study. BK1249 $12.95 


APPLE MACHINE LANGUAGE—by Don Inman and 
Kurt Inman. APPLE MACHINE LANGUAGE builds 
upon your previous knowledge of BASIC, and teaches 
you thè machine language in small, easy, completely 
illustrateci steps. Following this guide, you will be able 
to write machine language programs directly, using 
thè Apple System Monitor. Each new program is 
thoroughly presented in functional blocks. with 
sketches of how each step will actually appear on thè 
video screen. Soon you will be entering and executing 
your own machine language programs, with predic- 
table results! BK1248 $14.95 
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Alan )■ Porker/John F. Aetuart 


MOSTLY BASIC: APPLICATIONS FOR YOUR APPLE II, 
BOOK 1—by Howard Berenbon This book provides 
you with 28 ready-to-use. BASIC language programs 
which have been completely tested and debugged for 
use on your Apple II. Includes a telephone dialer, 
digitai stop watch, spelling test, a house buying guide, 
a gas mileage calculator. and many others useful to 
businessmen, hobbyists. scientists. and computer en- 
thusiasts. BK1251 $12.95 

MOSTLY BASIC: APPLICATIONS FOR YOUR APPLE II, 
BOOK 2—by Howard Berenbon A second gold mine of 
fascinating BASIC programs. including two dungeons 
that test your math and history abilities and another 
one that's strictly for fun. eleven household programs, 
a monthly savings pian and six more on money or in¬ 
vestment, two that test your level of ESP, and more— 
32 in all! Excellent for beginning or advanced com- 
puterists. BK1252 $12.95 

KIDS AND THE APPLE-by Edward H. Carlson. 
Whether you are a kid. a parent, or a teacher, this book 
is something unique. It starts with thè bare bones in¬ 
troduction to programming. leads quickly to more in- 
teresting programs, and gives anyone who uses it a 
complete knowledge of Applesoft BASIC. Lively il- 
lustrations, notes to parents and teachers and ques- 
tions for thè reader are sprinkled throughout thè book. 
While this guide is aimed at 8-16 year olds, adults will 
find it equally attractive as a beginning book for use 
thè Apple personal computer! BK1253 $19.95 


For Toll Free Ordering Cali 1-800-258-5473 

*Use thè order card in this magazine or itemize your order on a separate piece of paper and mail to incider Book Department • Peterborough NH 03458. Be sure to in¬ 
clude check or detailed credit card information. No C.O.D. orders accepted. All orders add $1.50 for thè first book, $1.00 each additional book for U.S. and foreign surface. 
$10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions regarding your order? Please write to Customer Service at thè above address. 
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"This FIND and REPLACE mode enables one to 
change name and address only on a form letter, saving 
thè need of retyping thè letter time after time." 


appears on screen. Are you sure you 
want to delete this text? If so, answer Y 
and thè text disappears. Answer N and 
thè inverse téxt is converted back to 
normal. A maximum of 15 lines can be 
deleted before you must repeat thè 
procedure to continue erasing. Une- 
rase does exactly thè opposite, and is 
only available for thè most recently 
erased segment of text. 


MOVE and MOVEBACK transport thè 
text into different areas within thè 
body of your document. Again, thè 
specific mode must be highligbted, fol¬ 
lo wed by a press of thè return key. The 
text to be moved is again highlighted 
after you mark both thè start and end 
of thè segment and can be transferred 
a maximum of 15 lines. Moving thè 
material beyond 15 lines requires an- 


Circle 250 on Reader Service card. 



ASCII EXPRESS “THE PROFESSIONAL 


99 


Valuabie 
subscription 
benefit to 
“THE SOURCE” 
with purcbase 
of ASCII F.XPPESS 
“THE PROFESSIONAL” 


The most valued 
Communication Software 
ever published for thè 
Apple ir Computer. 

ASCII EXPRESS "THE PROFESSIONAL" is 
thè answer to all of your Communications 
needs. Cali Information Services, such as 
"THE SOURCE”, exchange Apple DOS files 
with other compatible programs with error- 
free protocol transfers, send or recelve any 
text files, or use password-protected Auto- 
Answer mode for unattended operation. The 
features are many: 

Compatible with all popular modems and 
hardware devices for thè Apple. 

Supports baud rates of up to 9600. 
Editor creates or alters text files. 

Data Buffer holds 28K bytes with 64K 
Apple, 18K with 48K Apple. 

Powerful Macros put your Apple on auto- 
matic pilot for fast log-ons, 

Macro Library lists phone numbers and 
characteristics of 26 computers. 
Emulates many popular terminals. 

You can use ASCII EXPRESS "THE PROFES¬ 
SIONAL” thè first day you buy it. Command 
and Help menus are available at any time. 
And, as your Communications needs grow, 
ASCII EXPRESS "THE PROFESSIONAL 
grows with you. 

For Apple Communications, cali on 'thè prò, 
ASCII EXPRESS "THE PROFESSIONAL." 


THE LEADERS IN INNOVATIVE COMMUNICATION SOFTWARE 

10761 Woodside Avenue, Suite E, Santee, CA 92071, (619) 562-3670 


•Also Apple II + and Ile compatible. Apple. Apple II, Apple II + and Apple Ile are trademarks of Apple Computer, Ine. 

"THE SOURCE" is a Service mark of Source Telecomputing Corporation. 


other MOVE command and a repeat of 
thè process. MOVEBACK returns your 
text to its originai setting and only 
works on thè most recent segment. 

A word consisting of up to 29 char- 
acters can be found or replaced by 
Bank Street Writer. Highlight RE¬ 
PLACE and you’re asked to enter thè 
word to be found. Press return and 
you’re asked to replace thè word with 
thè new word. Bank Street Writer then 
finds each requested word, highlights 
thè word in thè text, and asks if this 
word is to be replaced. If you answer 
Y, thè new word is inserted, thè old 
word is deleted, and thè next occur- 
rence of your selected word is located 
in your document. An answer of N 
moves to thè subsequent occurrence. 

Although certainly not as handy as a 
word processor with a glossary func- 
tion, this FIND and REPLACE mode en¬ 
ables one to change name and address 
only on a form letter, saving thè need 
of retyping thè letter time after time. 

Again, most of these modes are 
found on more expensive word proces- 
sors, and for thè initial price of only 
$69.95, they certainly make this prod- 
uct a viable entry into thè text crafting 
market. 

Whenever a document has to be 
saved or retrieved from your data disk, 
or you wish to initialize a data disk, 
renarne your previously saved docu¬ 
ment, clear memory or delete an un- 
wanted file, thè TRANSFER MENU must 
be accessed from thè Edit mode. This is 
thè function found to thè right of thè 
screen. 

The submenu appears when in 
Transfer mode, and thè function you 
desire must again be highlighted. Press 
return to enter that process. To initial¬ 
ize your disk, make certain that you 
know which drive you have designated 
as a data drive. This was accomplished 
when we discussed thè utility pro¬ 
gram. Here are two methods of mak- 
ing certain you know which is which: 

• Turn off thè program, reboot, and 
press thè escape key to enter thè utility 
program. Select 1 to have another look 
at thè parameters set. 

• After accessing INIT, remove your 
program disk from drive #1, insert 
your data disk, and follow thè on- 
screen directions. If drive #2’s light 
comes on and whirrs and clacks away, 
then your data disk drive has been set 
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to 2. An error message arrives on 
screen, and you can try again by sim- 
ply reinserting your program disk in 
drive §1 and your data disk in drive § 2. 
If drive §1 carne to life, then you’re 
safe. You have an initialized disk. 

SAVE and RETRIEVE access your data 
disk. You’re asked for a filename and 
then queried for a password. This pass¬ 
word may be used when saving your 
file. This is fine for limiting access to 
personal files; however, this procedure 
may be easily defeated by simply 
renaming thè document with thè 
originai name—thè password lock will 
no longer be in place. Document 
names cannot be longer than eight 
characters. In either mode, you’ll be 
asked if you wish a data disk catalog 
and a simple “Y” or “N” should be in¬ 
put. QUIT is another selection made 
from this mode. 

PRINT FINAL is thè function high- 
lighted when you want to control how 
your text is formatted on paper. You’re 
asked how many characters you want 
per line, with a range of from 40 to 126 
characters. Spacing may be set at 
either single, doublé, or triple spacing. 
If thè document is a continuation of a 
previous document, then it will be 
chained, using thè same headers and 
continuation of page numbers. 

You can also decide if pages are to be 
numbered. For printers using single 
sheets, a pause is allowable between 
pages. The last page may be ejected, 
giving you a fresh sheet of paper for 
your next task. A page heading of up to 
38 characters may also be input. This 
heading appears on all of thè pages. 
You can print thè entire document or 
parts of thè document. A handy fea- 
ture allows you to see where each page 
of thè current text ends. This is helpful 
in formatting thè pages, so that they 
don’t break in awkward places. Dur- 
ing thè printing process, press thè 
escape key to halt thè printing. 

PRINT DRAFT prints your text exactly 
as you see it on your screen, at 38 
characters per line. A few of thè same 
questions as in PRINT FINAL mode are 
asked. To change values, thè utility 
program may be accessed. 

To dose things up, there is a handy 
index/glossary at thè back of thè man- 
ual, which not only offers thè mean- 
ings for some of thè words used 


throughout thè book, but also indi- 
cates thè pages where these references 
are made. 

What is, or isn’t, Bank Street Writ- 
er? This is not a word processor adapt- 


"Bank Street Writer is perfect 
for thè home. It introduces 
word processing to thè novice 
but does have some 
sophisticated features.'' 


ed for major business undertakings. 
For those used to a highly sophisticated 
word processor, such as Zardax or 
Wordstar, Bank Street Writer may 
seem primitive. But keep in mind that 
thè entire Bank Street Writer package 


costs only $69.95. It’s quite a value as 
far as I’m concerned. 

Bank Street Writer is perfect for thè 
home. It introduces word processing to 
thè novice but does have some sophisti¬ 
cated features. I think children aged 
eight and up will find Bank Street 
Writer perfect for their needs (school 
reports, etc.), and thè first-time word 
processing user will find report crea- 
tion simple and rewarding. For those 
who disagree, recali your first ex- 
perience with a more complex word 
processor, and thè amount of time and 
frustration spent learning thè System. 
Bank Street Writer is usable im- 
mediately! 

Bank Street Writer requires an Ap¬ 
ple II, II Plus, or Ile, 48K bytes RAM, 
one disk drive, 16 sector controller, 
Applesoft in ROM or RAM and extra 
memory of 16K RAM or language card 
utilized by program. It is produced by 
Broderbund Software. 1938 Fourth 
St., San Rafael, CA 94901. ■ 
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Can your VisiCalc Sor!? 


UU1 l Lilt? IUWb 

or columns of a 
VisiCalc 
spread sheet. 


2/09/83 

2/11/83 

2/15/83 

2/19/83 

2/23/83 


$45U.' 
$1.500.00 
$390.00 
$ 2,000 00 
$945.00 




Mares. P 
Davis. N 
Franks. B. 
Howard. R- 


from Solutions, Ine. 


Date 

2/19/83 

2/11/83 

2/23/83 

2/09/83 

2/15/83 

2/05/83 


Contribution 

$2.000.00 

$1.500.00 

$945.00 

$450.00 

$390.00 

$225.00 


Fraffl 

Mares^^S 
Howard, R- 
BilUngs. J. 
Davis, N. 
Jones, R. 


It can with VIS \ Bridge/SORT 

The sorted spread sheet 
stili contains all thè 
formulas and values from 
thè unsorted originai. Up 
to 5 rows or columns may 
be used as sort keys. 

Each key may be alpha or 
numeric and either ascen- 
ding or descending. 

VIS\Bridge/SORT is available for thè Apple® II + and III, 
thè IBM PC™ and thè TRS-80® I, 11/16, and III. 

$89 plus $4 shipping and handling from Solutions, Ine. 
Order 802 229 0368. Box 989, Montpelier, VT 05602. 
MasterCard and Visa. Dealer inquiries welcomed. 

Also available: VIS\Bridge/REPORT™ for $79 and 
VIS\Bridge/DJ™ (Dow Jones) for $445. 

All VIS/Bridge Products are trademarks ot Solutions ine VisiCalc* is a trademark ot VisiCorp TRS-8 
IBM PC™ is a trademark ot IBM Corp Apple’ is a trademark ot Apple Compulers ine 


■ is a trademark ot Tandy Corp 
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Utility 


Input Insulti 

Getting Around thè Problem 


Has your Apple been rejecting sincere 
attempts to communicate? You can sidestep 
these input problems using thè GET 
command and a few tricks of thè trade. 


W hen was thè last time your 
EXTRA gOt IGNORED? I don’t 
know about you but I don’t bave 
enough as it is. Thank goodness it’s my 
Apple talking; I don’t think I could 
handle thè rejection otherwise! 

The INPUT statement has been a 
problem since day one with thè Apple, 
and unfortunately none of thè manuals 
really help us get around thè problems 
with entering commas, colons and 
quote marks into strings. And when 
disk Storage and access is involved, it 
really starts to get frustrating. Talk 
about rejection: BAD RESPONSE TO AN 
INPUT STATEMENT, if you’ve already 
had your EXTRA IGNORED. . .well, it's 
just hard on your ego. 

With INPUT you simply can’t use 
commas and colons, and if you pian to 
send thè data to disk with any inten- 
tion of retrieving it later, you'd better 
not embed any quote marks. Within a 
program: 

100 INPUT "ENTER DAY & DATE: ";DT$ 
would probably prompt thè user to 
respond: 

FRIDAY. APRIR 15 

and thè Apple would print: 

FRIDAY 

EXTRA IGNORED? 

Similarly, retrieving from disk files 
data which has embedded commas or 
colons will produce thè same result. 
And. if quote marks were used within 
134 Èider May 1983 


by M. Max McKee 

a string, we get thè fatai errar: BAD 
RESPONSE TO AN INPUT STATEMENT. 
Very frustrating when we’re just trying 
to use thè Apple for text manipulation 
without wanting to create a complete 
database word processing System. 

Getting around those problems is 
thè answer. That is to say, by using thè 
Apple’s GET instead of INPUT, it is 
possible to monitor each character as it 
is entered (very nice for limiting input 
to all numbers or all alphabetic char- 
acters, for example) and to build a 
string one character at a time. Instandy, 
thè EXTRA IGNORED problem within a 
program is solved, and with one simple 
addition you can take care of disk ac¬ 
cess as well. Placing a “throwaway” 
quote mark— CHR$(34) —in front of thè 
built-up string before sending to disk 
guarantees that upon disk access thè 
Apple will look at thè string requested 
(via thè INPUT statement) as a literal. It 
will return thè entire string but will 
dump thè lead quote. Voila! No EXTRA 
IGNORED. 

The only problem remaining is get¬ 
ting quote marks back from disk with¬ 
out an errar. Since GET will monitor 
cach character entered by thè user, it is 
a simple matter to change thè ASCII 
value of thè quote from CHR$(34) to 
CHR${98) before adding it to thè string. 
Result: Apple DOS doesn’t see it as 
quote marks related to INPUT but re- 
turns a character which to us looks ex- 
actly thè same. Try it. 


PRINT CHR$(34):PRINT CIIR$(98) (return) 

Listing 1 has been set up as a com¬ 
plete program, but its major purpose is 
to provide you with a short subroutine 
called GETLOOP which will handle all 
data input problems. 

GETLOOP is located between state- 
ments 50 and 98 and requires a GOSUB 
5900 prior to GOSUB 50. The defined 
function at 5910 sets up FN BY(Z) as a 
dummv variable that looks at thè screen 
to see thè actual character placed there 
by thè PRINT N T $ statement in 94. 

When thè program is run, you will 
be asked how many characters you 
w'ant allowed during input. (This con¬ 
trol function can be removed by 
deleting lines 5040-5050, 58 and 82.) 
It is there to show' a simple way in 
which thè user can be limited. If you 
don’t want thè user to have any ehoice 
in thè matter, just change 5040 to 
ML$ = “###”. 

Entry into GETLOOP places thè cur- 
sor at thè left side of thè screen at VTAB 
I (unless otherwise specified) and then 
sets thè string NN$ to nuli. Statement 58 
prints as many periods as specified by 
line length and repositions thè cursor 
at thè first dot. 

Whatever thè user types is handled 
through thè GET N$ in 62 and PRINT N$ 


M. Max McKee is presidetrt of Multi Data Service 
Cotj)., 407 Terrore St., Ashland, OH 97520. 




Program listing. No-problem Apple input. 


o 

io 

20 

50 

54 

58 

62 

66 

70 

74 


REM NO-PROBLEM APPLE INPUT 
GOSUB 5910 
GOTO 5000 

REM GETLOOP#***************** 

HTAB IsSV = PEEK (37) + 1 : NN* *= "" 

FOR I » 1 TO ML: PRINT ".°? s NEXT : HTAB ls VTAB SV 
H « LEN (NN*):V = SV + INT (H / 40): VTAB V: GET N*:OV ■= V - l:OH 
PEEK (36) 

IF N* = CHR* (27 
IF NOT H AND N* 

IF N* * CHR* (8) 

SH: ON (H > 1) 


78 

82 


86 


90 


94 


» CHR* (34) THEN N* 
ML THEN IF N* < 


THEN 50 

CHR* (8) THEN 54 
THEN NN* = LEFT* (NN*,H 
1 GOTO 54,62 


(H > 1)>: HTAB H - 1 + 


CHR* (98) 
CHR* (13) THEN 


PRINT CHR* (7);: GOTO 6 


958: PRINT :NN* = CHR* (34) + NN*: 


IF N* 

IF H = 

2 

IF N* = CHR* (21) THEN HTAB SH + H + 1: VTAB PEEK (37) + (H 
40): GOTO 98 

IF N* - CHR* (13) THEN CALL 
RETURN 
PRINT N*j 

98 NN* = NN* + CHR* 

5000 
5010 
5020 


FN BY(Z> - 128): GOTO 62 

REM MAIN********tt*****«**t 

TEXT : HOME 

HTAB 8: INVERSE : PRINT '* NO-PROBLEM APPLE INPUT 


5030 

5040 


5070 

5100 


5130 


NORMAL : VTAB 3 

INPUT "DESIRED LINE LENGTH7 (1-238) ";ML*: IF NOT VAL (ML*) THEN 
5000 

5050 ML * VAL (ML*): IF ML > 238 THEN 5000 
5060 VTAB 5: PRINT "TYPE ANYTHING» (EVEN 
VTAB 7; GOSUB 50 
REM SAVE STRING TO DISK**** 

5110 D* = CHR* (4) 

5120 VTAB 14: HTAB 13: FLASH : 

PRINT D*;"OPEN TESTSAVE" 


CHR* (34)">" 


PRINT "SAVING TO DISK": NORMAL : PRINT 


Listing continue^. 


in 94. If thè right arrow is pressed (see 
statements 70-74), thè routine ad- 
vances thè cursor and adds whatever 
was underneath it to thè growing 
string NN$. If thè left arrow is pressed 
(statement 86), thè cursor moves left 
and subtracts one character from thè 
length of NN$. If thè quote is pressed 
(statement 78), thè routine converts its 
ASCII value from 34 to 98. If thè 
length of NN$ equals thè allowable 
string length specified by ML, thè Ap¬ 
ple beeps control-G (statement 82) and 
returns for another character. If return 
is pressed, thè “throwaway” quote is 
added to thè front of NN* (statement 
90) before exiting GETLOOP. 

To demonstrate thè power of this 
type of subroutine, I’ve added an 
escape key function at 66. If you press 
escape anytime during input, thè line 
is blanked out and starts over. This 
could just as well teli thè Apple to ac- 
cess a routine to answer thè telephone 
or reinitialize your favorite adventure 



A unique experience for those who love a challenge... 

SPITFIRE SIMULATOR... 

Fly a 360 mph Spitfire fighter • Pursue and attack 3-D target 
aircraft • Eight target types (Me 109, Fw 190, etc.) • Scores 
for targets hit and successful mission completion 
T : '' •;>„ • Aerobatic (loops, rolls, stalls, etc.) 

• AIRSIM-I pilots: SPITFIRE SIMULATOR 
can use AIRSIM-I scenery! 
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VISA 

$40 00 

Mass, residents 
add 5% sales fax. 

Overseas shipping 
add $3.00. For 
Apple II or 11+ with 
48 K RAM. Applesoft ROM 
or equivalent. One disk. 

Game paddles or joystick 
See your dealer or 
contact us directly 

Apple is a Trademark of Apple Computer. Ine. 
AIRSIM Is a Trademark of Mnd Systems Corporation. 
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Cali 18001847-4176 For Protection! 


• Apple 

• Atari 


• AVL 

« 

• Bell & 
Howell 

• Centronics 



Aluminum 
Shipping Case 

witn 

Removable Cover 

$215.50* 


Polyplex 
Heavy-Duty 
Carrying Case 

$142.50* 





• Commodore 


• Epson 

• IBM 


• Hewlett-Packard 


Apple II cases 1 

holding 2 
disk drives 

Aluminum 
Shipping Case 

$216.50* 


ABS Storage 
& Carrying Case 

with 

Removable Cover 

$69.50* 


‘UPS Shipping Included. 



WÈ Cali for Complete Computer Case Catalog. 
Credit Card Customers Cali Toll Free 
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• NEC 

• Radio- 
Shack 
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• TRS-80 

• Xerox 
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Instruments 


Fiberbilt 

Ikelheimer-Ernst, Ine. 

601 West 26th Street 

New York, New York 10001-1199 

(212) 675-5820 (N.Y.C. area) 
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One Year Warrant y 
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With Zener Ray™ 
Protection $109.00 
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120 VOLT OUTLETS 


ALSO FITS ON APPLE’S* NEW MONITOR STAND 
RED PILOTLIGHTON/OFF SYSTEM SWITCH 
CLIPS ON — NO HOLES OR SCREWS • REPLACEABLE SWITCH 
AVAILABLE IN 120V or 240V AND 50/60 HZ • DURABLE MOTOR 
REDUCES HEAT CAUSED BY EXTRA PLUG-IN CARDS 
SOLD WORLD WIDE • UNIQUE1 YEAR WARRANTY 
TAN OR BLACK COLOR • QUIETEST FAN ON THE MARKET w 

INCREASED RELIABILITY — SAVES DOWN TIME AND REPAIR CHARGES 

LOW NOISE DUE TO DRAWING EFFECT OF AIR THROUGH YOUR COMPUTER AND SPECIAL FAN AND MOTOR DESIGN 
TWO EXTRA 120V OUTLETS FOR MONITOR AND ACCESSORIES TURN ON WHEN YOU TURN ON YOUR FAN 
(NOT AVAILABLE ON 240V MODEL) 

SUPER FAN II™ WITH ZENER RAY OPTION $109.00 

ZENER RAY™ TRANSIENT VOLTAGE SUPPRESSOR 

OUR BUILT IN ADVANCED DESIGN UNIT GIVES 
DRAMATIC COSTSAVINGS — STOPS ANNOYING DOWN TIME 
INSURANCE FROM VOLTAGE SPIKES - GLITCHES 

DANGEROUS VOLTAGE SPIKES CAN JEOPARDIZE YOUR COMPUTER SYSTEMS 
PROTECT COMPUTER - DISK DRIVE - PRINTER AND MONITOR 

NO CUTTING WIRES • WON’T VOID WARRANTY, JUST PLUG IN SUPERFAN II WITH ZENER RAY 

OTHER PRODUCTS BY ‘ ^Electronics, inc. 

SUPER RAM II™ 16K RAM CARD FOR YOUR APPLE II. 2 YEAR WARRANTY $125 

GUARDIAN ANGEL™an uninterruptable power source $595 

12 VOLT TRANSVERTER 12 VOLT — RUNS YOUR APPLE II COMPUTER AND 

AND 51/4 " DRIVE FROM YOUR CIGARETTE LIGHTER $149 

‘Registered trademarks of Apple Computer Ine. 

























Review 


Franklin Ace 100 


While Franklin mints near-copies of thè Apple, 
thè argument rages over which machine offers 
better price-performance. The following candid 
comparison of thè Apple II Plus and thè 
Franklin Ace will put it all into perspective. 


T here is much difference between 
imitating a good man and coun- 
terfeiting him.” 

When Ben Franklin wrote those 
words in 1738 neither he nor anyone 
else could have predicted thè age of 
microcomputing. Yet Franklin’s sage 
counsel has stood thè test of time, wit- 
ness thè appearance of Franklin Com¬ 
puter Corporation’s Ace 100, a com¬ 
puter that looks like thè Apple II Plus 
and is said to be completely compatible. 


by Timothy Daniel 


The question of imitation versus 
counterfeiting might best be answered 
by comparing thè Apple and Franklin 
side by side. Both computers have a 
box-like shape with thè Franklin being 
slightly bigger. One major cosmetic 
difference is thè Franklin has a dif- 
ferent keyboard (see Photo 1). The 
Apple has 52 keys compared to 72 keys 
on thè Ace 100. Franklin hasn’t incor- 
porated 20 new characters though; 
most of thè additional keys are part of 


a numeric keypad. What is unique to 
thè Ace are two bracket keys, (/) and 
[/], and keys labeled PAUSE, BREAK 
and alpha-LOCK. The resulting 
layout looks more like a conventional 
typewriter than it does thè Apple. For 
example, if you type (SHIFT 8) you’ll 
get *, thè same as a Smith-Corona por- 
table! The Apple, however, returns a ( 
for that combination. 

The numeric keypad, which is de- 
signed to aid data entry, is supple- 
mented by dedicated - , + , *, = and 
'. keys. When combined with thè two 
bracket keys this part of thè keyboard 
is ideally suited for use with several 
spreadsheet programs. 

The presence of an alpha-Lock is 
explained by thè Ace 100’s upper/ 
lowercase capability, compared to thè 
Apple II Plus keyboard that generates 
only uppercase lettere. The shift is used 
to toggle between two different char¬ 
acters, like thè 8/( key. Because of thè 
lack of a lowercase keyboard many 
Apple programs use a shift key modifi- 
cation. Unless thè shift key is depressed 
thè software converts thè uppercase 
character into a lowercase one. The 
biggest drawback is thè need for a 
hardware modification and some ad¬ 
ditional software. (Both thè Franklin 



Photo 1. The shape and generai layout of thè Franklin Ace 100 closely resemble that of thè Apple II. 
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WILLMAKE YOUR APPLE II 

rHEJACKOF o ALL°TRADESFQR$129 Q9 


Four applications in one. 

The Incredible Jack combines thè 
avenience of a personal fìler with thè 
wer of a cale package. It handles 
)st word processing tasks with ease. 
ss in thè ability to sort and print 
liling labels, and you have a totally 
:egrated, suprisingly easy to use 
ckage that does most of what you 
ught your Apple for. 

Organize information your way. 
The Incredible Jack lets you arrange 
ur information in “records” you design 
urself using thè computer display, 
ich record may be as little as a mailing 
ael or as large as 60 sheets of legai 
ed paper. 

Word processing made easy. 

With a few simple commands you can 


master in minutes, you can create 
letters, memos and reports. To help 
you edit, Jack lets you insert, delete, 
and copy portions of text all with 
automatic word wrap and flush right 
margins. The Jack does away with thè 
mind boggling control codes and 
formatting options of other word 
processing packages. 

Automatic decision making. 

Jack even allows you to build decison 
making logie into your file. With 
English language rules and a powerful 
IF THEN ELSE function, you can 
instantly calculate complex discount 
tables, commission plans, contract 
terms, or tax rates. 

See for yourself. 

Try Jack. (Youìl need an Apple II 

Circle 282 on Reader Service card. 


with 16K memory extension and 2 
disks.) If you’re not convinced it’s thè 
best investment you’ve made since you 
bought your Apple, send Jack back 
in good condition within 2 weeks 
for a full refund. 

To order cali: (800) 645-4513. For 
information: (516)269-1120. To order 
by mail, enclose $129.00 plus $5.00 
shipping and handling. 

(charge card # 
and exp. date) 

N.Y. residents add 714% tax, and send 
to: Business Solutions, Ine. 

60 E. Main St„ Kings Park, N.Y. 11754. 

THE INCREDIBILE 

™ (business) 
1 Solutions. 

WII.I MAKI YOCK APPLE II THEJACKOFALLTRADES 












Photo 2. Peripheraìs that work with an Apple can he used with thè Ace 100. A Micro-Set disk drive 
controller and Grappler printer interface are shotonhere. The cable in theforegroundrunsfrom thè 
keyboard to thè game connector and serves as a substitute for thè Apple shift key modification. 


and recent versions of thè Apple allow 
you to display upper- and lowercase 
characters.) With thè Ace 100 you 
don’t need a shift key modification. To 
input and display “Franklin” as part of 
a Basic program just type it normally. 
Of course, you can also use thè alpha- 
lock and get “FRANKLIN”. With 
thè alpha-lock on, thè Ace 100’s 
keyboard output resembles thè Apple, 
all upper case, and you stili use thè shift 
key to differentiate between two char¬ 
acters on one key, 1 and I for example. 

Lcoking Inside 

With exception of thè Franklin’s 
keyboard, thè Ace 100 has circuitry 
that is almost identical to thè Apple II 
Plus, in both component choices and 
layout. You’ll find eight peripheral 
slots, game connector and power sup- 
ply junctions, just like in thè Apple. 
There are only three obvious differ- 
ences—an absence of input and output 
jacks for a cassette interface, extra 
space in thè middle of thè Franklin Cir¬ 
cuit board designated “ROM AREA” 
and a fan on thè Ace 100 power 
supply. 

If you expect to do anything more 
than run prepackaged software on 
your Franklin, be prepared to buy or 
borrow additional documentation. 
The Apple 11 User’s Guide by Lon 
Poole can be very helpful, in addition 
to Apple’s DOS Manual and Reference 
Manual. Franklin representatives have 
told me that a “technical” or Service 
manual will be available but wouldn’t 
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say when or if it would be sold to thè 
public. 

Hardware Compatibility 

“Any peripheral that works with 
Apple will work with thè Ace.” The 
seriousness of such a claim comes home 
if you consider thè huge number of Ap¬ 
ple peripheraìs on thè market. By us- 
ing similar circuitry and firmware, 
Franklin has insured hardware com¬ 
patibility. You can plug in an Apple II 
disk drive controller or any of thè Ap¬ 
ple compatible controllers, use a Z-80 
card, a printer interface card, joysticks 
and so forth. (See Photo 2.) 

There seem to be only three excep- 
tions to Franklin’s compatibility claim. 
Don’t expect to use software stored on 
cassette tape, or use speech software 
that requires thè cassette interface. 
Nor will you want to use thè Ace 100 
with a color monitor; only black and 
white graphics will be shown. A minor 
hardware change eliminated thè Ace 
100’s ability to generate color video. 

The third exception comes from thè 
difference in keyboards—no shift key. 
The lack of technical documentation 
forces you to do without or to probe 
blindly around thè keyboard for a suit- 
able signal. There are several such tie 
points available, but none seem to pro¬ 
vide one exactly like thè Apple 
modification. 

Software Compatibility 

“Any program that runs on thè Ap¬ 
ple will run on thè Franklin Ace 100.” 


This can be done because thè monitor 
and Basic ROMs are almost identical 
to thè Apple ROMs. A large variety of 
machine language and Applesoft pro- 
grams run successfully on thè ACE 100 
and there is no problem in implement- 
ing Apple’s Integer Basic, thanks to thè 
64K of RAM. 

The ACE 100 is sold with 64K of 
RAM while thè typical Apple comes 
with 48K. Franklin accomplishes this 
16K difference in thè same manner 
that Apple does when it upgrades a 
machine to 64K. All you do is add a 
memory card to peripheral slot 0. The 
Franklin 16K add-on resembles thè 
Apple language card as well as third 
party memory boards and uses a strap 
that runs to thè RAM section of thè 
main board. By removing thè memory 
card and transferring one of its 4116 
RAM chips to thè socket where thè 
strap once was, I turned my 64K Ace 
100 into a 48K Ace 100. 

Firmware 

The Ace 100 firmware plays a 
cruciai role in making thè computer 
compatible with software written for 
thè Apple. Officials at Apple claim 
that Franklin accomplished this by re- 
producing thè contents of thè Apple II 
Plus ROM. The legality of such a tactic 
will be decided in court. 

A byte by byte comparison of thè 
Apple Autostart ROM and its Franklin 
equivalent showed that slightly more 
than 200 bytes differed, about 10 per- 
cent of thè ROM. The Franklin’s 
monitor does not provide for writing 
or reading memory on tape, a logicai 
omission when you remember that thè 
Ace 100 has no cassette I/O* Other 
changes stem from thè difference in 
thè two computers’ keyboards. None of 
thè changes affect using thè monitor or 
running machine and Applesoft pro- 
grams. The Ace 100 comes with a 
firmware Basic that bears a remark- 
able resemblance to Applesoft Basic. 
The only difference seems to be thè 
lack of Save or Load for cassette 
Storage. 

Documentation 

Franklin must have operated under 
thè assumption that less is better when 
they prepared documentation for thè 
Ace 100. The 24 page Operatofs Ref¬ 
erence Manual covers only unpacking, 

































Circle 317 on Reader Service card. 



Franklin 

Shortly after I wrote this review 
of thè Ace 100, Franklin Computer 
Company announced thè avaùabil- 
ity of thè Ace 1000, a model de- 
signed to supersede thè Ace 100. 
The major differences between thè 
1000 and 100 seem to be in thè dif- 
ferent cabinet (thè 1000 features a 
pop-off top), thè location of thè re¬ 
set switch (it is not located near thè 
main keyboard on thè Ace 1000) 
and thè inclusion of all 64K of RAM 
on thè main Circuit board (thè 100 
uses an extra board for 16K of its 
memory). From thè user’s point of 
view thè Ace 100 and thè Ace 1000 
are said to be identical. 

There seems to be some confusion 
about thè color capability of an Ace 
1000. Several distributors and at 
least one Franklin sales representa- 
tive claim that thè Ace 1000 has col- 


cabling (internai and extemal) and 
loading a program. Despite its short 
length thè manual has two pages of er¬ 
rata. Once you get past installing disk 
drives, thè 16K board, plugging thè 
computer in and loading thè first pro¬ 
gram from disk, you are on your own. 
Information about programming is 
nonexistent. 

The exceptions to Franklin’s soft¬ 
ware claim come from thè Ace 100’s 
hardware limitations—programs 
should not require a cassette interface 
or color video. Unfortunately thè Ace 
100’s improved keyboard is often use- 
less and in some cases is a hindrance 
when used with word processing that 
has ingenious programming to get 
around thè Apple lower/uppercase 
problem. Franklin’s solution is to pro¬ 
vide patches for popular word process¬ 
ing software. The Owner’s Reference 
Manual is accompanied by a modifica- 
tion for AppleWriter, and Franklin 
plans to offer similar patches for other 
popular programs. 

Advantages and 
Disadvantages 

The biggest selling point for thè 
Ace 100 is its price, about $250 less 
than a 64K Apple. Strict cost compari- 
sons are, of course, unfair due to thè 
differences in features, documentation 
and support. The Ace keyboard will 
be preferred by experienced typists, 
thanks to its conventional layout, ex- 


Update 

or capability. Other distributors 
and a Franklin technical represen- 
tative stated that thè Ace 1000 is not 
capable of generating color video 
but that a modification circuit 
should be available by late 1982. In 
thè absence of any definite commit- 
ment from Franklin, at least one 
outside supplier is offèring a color 
modification kit. 

As of mid November Franklin 
was not making a Service manual 
available to thè public. Despite sev¬ 
eral verbal promises thè only soft¬ 
ware patch available at this writing 
is for AppleWriter. Potential 
Franklin owners would be well ad- 
vised to deal with a knowledgeable 
distributor. The manufacturer does 
not seem well equipped to handle 
user problems or questions, either 
by phone or mail. ■ 


cellent tactile feedback, offset reset key 
and numeric keypad. Franklin s inclu¬ 
sion of a fan was a wise move, especial- 
ly if you intend to fili several of thè pe- 
ripheral slots. 

The Ace 100’s deficiencies center 
around Franklin’s implication that all 
Apple hardware and software is com- 
patible. This just isn’t so, as shown by 
thè lack of color video and cassette in¬ 
terface. The business user who wants 
VisiCalc may not need these frills, but 
thè game enthusiast could be disap- 
pointed by their absence. 

The second set of disadvantages 
arises from thè lack of documentation 
and support. Franklin, a relatively 
new firm, will sell only a fraction of 
thè computers that Apple does, so you 
cannot expect extensive technical ref- 
erences or user support. 

Ace 100 hardware advantages, 
fan, upper/lowercase and keypad, can 
be added to an Apple, although you’ll 
spend quite a bit more if you go that 
route. The disadvantages associated 
with thè Ace 100, once recognized, 
are not extreme and perhaps will be 
solved with time. Meantime, Franklin 
provides an attractive alternative for 
cost conscious users with well defined 
needs. 

As for thè question of imitation ver¬ 
sus counterfeiting, Apple versus 
Franklin, Ben said, “Don’t value a 
man for thè quality he’s of, but for thè 
qualities he possesses.”B 


&IXTU FU16ER 

The autornatic repeat 
key for your Apple II* 

$ 9.05 

Ateo introducing our new 
adjustable unit with on/off 
festure 

$ 12.95 

»Adapts your Apple; all keys 
held down will repeat after 
thè perfect delay. 

»Great for program editing, 
word processing &. VisiCalc* 

»Eesy for anyone to instai. 
PUgB orto thè Apple's encoder 
board (all rev 7 or latar Bnd late 
rev S with encoder board). 


(30 day trial] 

Regulan unit $0.95 

Adjustable unit 1235 

Add shipping 1.00 

Overseas shipping 300 


Cai. nes. add 6 Q /o tax 
To order or request free 
instruction sheet use order 
form or cali (2130 B75-470B 



Dealer knqLires Invited 

♦Apple is a reoiatared tradomBrk 
of Apple Computer Co. 

♦VisiCalc is a re^stared trademe-k 
of VisiCorp. 
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Graphics 


Poking Perfection 

Pari II 


In March we showed how graphics commands could 
improve your text screen. Now here's a formatter 
to help you put on thè finishing touch. 


D oes thè design of your text screen 
leave something to be desired? 
Does your text screen suffer from thè 
top left corner blues, with all text origi- 
nating in thè top left corner? Or do 
your text screens suffer from thè con- 
tinuous scrolls, with every new text 
line appearing at thè bottom of thè 
screen? 

If you answered yes to any of these 
questions—fear not, relief is at hand! 
The Apple II Text Screen Formatter 
was designed to cure these and many 
more screen programming ailments. 

The Apple II text screen consists of 
24 rows of 40 columns, producing a 
grid of 960 character positions on thè 
screen. Figure 1 shows a chart of thè 
Apple II text screen, with thè 24 rows 
numbered 0 through 23, and thè 40 
columns numbered 0 through 39. Each 
grid location on thè screen corresponds 
to a single byte of thè random access 
memory (RAM) in thè computer. 

Row 0/column 0 grid location cor¬ 
responds to thè RAM byte address 
1024, and row 23/column 39 corre¬ 
sponds to thè address 2039. Consecu¬ 
tive grid locations on thè same row are 
stored consecutivelv in thè RAM, but 
consecutive lines are not stored sequen- 
tially. Figure 2 shows how thè Apple II 
RAM sequences thè screen lines. 

Notice thè RAM Stores thè screen 
rows 0, 8, 16, 1, 9, 2. . . and so on to 
thè end of thè screen. The column 
headed RAM in Figure 1 indicates thè 
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by A. E. Doughty 

byte address for thè column headed 0 
of each line. To access thè adjacent col¬ 
umns on thè same line, add thè column 
number to this byte address. 

Each screen RAM location can be 
poked with a text character (refer to 
Table 1 for thè text character values 
that can be used), thus thè statement: 

POKE 1469,65 

will place a flashing A on thè screen in 
row 11 at column 19 (almost in thè 
center of thè screen). The cursor is not 
positioned at this screen location. To 


"Each grid location 
on thè screen corresponds 
to a single byte of RAM.” 


position thè cursor at any grid location 
on thè screen use thè HTAB(column) 
and VTAB(row) statements. Figure 1 
shows thè row and column numbers to 
be used in thè HTAB(n) and VTAB(n) 
statements. 

Sometimes it is expedient to access 
thè screen RAM using thè Poke state¬ 
ment, but it is inconvenient to use thè 
RAM byte address directly. The fol- 
lowing short program will allow thè 
user to access thè screen RAM using thè 
row and column numbers from thè 
Apple II Text Screen Formatter: 


10 HOME : DIM ROW(24): SPEED = 240 
20 FOR K = 0 TO 7 
30 ROW(K) = 1024 + K* 128 
40 ROW(K + 8) = ROW(K) + 40 
50 ROW(K + 16) = ROW(K) + 80 
60 NEXT K 

This routine simply places thè RAM 
address of each screen row into thè ar- 
ray called ROW. 

Now add thè following lines to thè 
above routine, and observe what thè 
program does: 

99 J = 32 

100 FOR K = 39 TO 0 STEP - 1: POKE 
(ROW(O) + K) ,J: NEXT K 

200 FOR K = 23 TO 0 STEP - 1: POKE 

(ROW(23-K)),J: NEXT K 

300 FOR K = 0 TO 39: POKE 

(ROW(23) + K),J: NEXT K 

400 FOR K = 23 TO 0 STEP - 1: POKE 

(ROW(K) +39),J: NEXT K 

Another interesting effect can be ob- 
tained by changing line 99 to: 

99 FOR J = 1 TO 191 
and adding line 500: 

500 NEXT J 

The Apple II Text Screen Formatter 

On thè Apple II Text Screen For¬ 
matter, thè large star represents thè 
geometrie center of thè screen, and thè 
four smaller stars represent thè geo- 


Address correspondence to A. E. Doughty, 
11715 145 Ave., Edmonton, Alberta, Canada 
T5X 1M2. 






. Chart of thè Apple II text screen. 
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Value to be Poked into Video RAM for: 


Text Character 

Reverse 

Flashing 

Normal 

Text Character 

Reverse 

Flashing 

Normal 

@ 

0 

64 

128 

space 

32 

96 

160 

A 

1 

65 

129 

! 

33 

97 

161 

B 

2 

66 

130 

»» 

34 

98 

162 

C 

3 

67 

131 

# 

35 

99 

163 

D 

4 

68 

132 

$ 

36 

100 

164 

E 

5 

69 

133 

% 

37 

101 

165 

F 

6 

70 

134 

& 

38 

102 

166 

G 

7 

71 

135 

9 

39 

103 

167 

H 

8 

72 

136 

( 

40 

104 

168 

I 

9 

73 

137 

) 

41 

105 

169 

J 

10 

74 

138 

* 

42 

106 

170 

K 

11 

75 

139 

+ 

43 

107 

171 

L 

12 

76 

140 


44 

108 

172 

M 

13 

77 

141 

- 

45 

109 

173 

N 

14 

78 

142 


46 

no 

174 

O 

15 

79 

143 

1 

47 

ni 

175 

P 

16 

80 

144 

0 

48 

112 

176 

Q 

17 

81 

145 

1 

49 

113 

177 

R 

18 

82 

146 

2 

50 

114 

178 

S 

19 

83 

147 

3 

51 

115 

179 

T 

20 

84 

148 

4 

52 

116 

180 

U 

21 

85 

149 

5 

53 

117 

181 

V 

22 

86 

150 

6 

54 

118 

182 

w 

23 

87 

151 

7 

55 

119 

183 

X 

24 

88 

152 

8 

56 

120 

184 

Y 

25 

89 

153 

9 

57 

121 

185 

Z 

26 

90 

154 

; 

58 

122 

186 

[ 

27 

91 

155 

9 

59 

123 

187 

\ 

28 

92 

156 

< 

60 

124 

188 

] 

29 

93 

157 

- 

61 

125 

189 

A 

30 

94 

158 

> 

62 

126 

190 

— 

31 

95 

159 

? 

63 

127 

191 


Table l. Text character values for screen formatting. 


umns on thè same line, add thè column 
number (0-39) to this byte address. 

Each screen RAM location can be 
poked with thè text character value re- 
quired (refer to Table 1 for thè values 
to be poked), but thè cursor is not repo- 
sitioned at that RAM location. 

Figure 1 represents a worksheet that 
metric center of each quarter of thè will cause an A to be printed in column can be used in thè design of screen lay- 
screen. 0 (thè firstshaded column), and a Bto out, before programming is started. 

The grid location row 1/column 1 appear in thè second shaded column. Once thè design of thè screen layout is 

shows thè position of thè cursor after a and a C to be printed in column 32. satisfactory to thè programmer, then 

Homé statement has been used. Note Notiee that there are 16 columns in thè thè coding can be started and thè pro- 

that thè cursor is not positioned at thè first and second fields, but only 8 in thè gram written using thè appropriate 

extreme top left corner of thè screen. third. If thè length of thè printed char- statements and location values. 

■ Shaded columns numbered 0, 16 acter string or value exceeds thè field The Apple II Text Screen Formatter 
and 32 represent thè automatic Tab width, it will overflow to thè next field is copyrighted by thè author, but origi- 

positions used when thè comma (,) sep- and tbe next available Tab position nal purchasers of this magazine may 

arator is used in Print statements— will be thè next shaded column. photocopy this chart for personal use. 

thus thè statement: The column headed RAM represents The Apple II Text Screen Formatter 

thè RAM addresses for column 0 of may not be copied, by any means, for 
PRINT “A”,“B”,“C” each line. To access subsequent col- distribution or sale to third parties. ■ 
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Okidata MICROUNE 92 



$ 524.88 UPS DELIVERED 

• 160 characters per second. bi-directional. logic-seeking printhead action 
with 80 & 40 cps hi-res correspondance print modes 

• 9 x 9 matrix produces correspondance. 10. & 17 cpi with true descenders; 
doublé width & download option for character sets standard 

• Subscripts, superscripts. underlining, backspace. & forms control 

• Friction & pin feed paper handling takes up to 3-part forms (8.5") 

• Centronics parallel or RS-232C interfacing (specify) 

Microlin* 93 (136 columns).$884.88 


C. Itoh F-10 Starwriter 



$ 1379.88 UPS DELIVERED 


• 40 characters per second. bi-directional, logic-seeking printhead action 

• 136 column, friction fed. takes 15" paper & 3-part forms 

• 96 character set. fully-formed letters on Diablo-compatible 
daisywheels for optimum print quality 

• Subscripts, superscripts, underlining, backspace, & forms control 

• Centronics parallel or RS-232C interfacing (specify) 

F-10 Printmaster(55 cps). $1679.88 

F-10 T ractor (Starwriter/Printmaster). $289.88 


PRINTRRS 


AitMkx 

Anadex WP-6000A (P&S)... i 
Anadex DP-9501A (P&S) ... «. 

Anadex DP-9620A (P&S) ... I14M.M 


Centronics 

Centronics 122 (P). 
Centronics 122 (R) 
Centronics 352 (P&S) 
Centronics 353 (P&S) 


S0M.88 

$049.88 

$1884.88 

$2329.88 


C. Itoh 



C. Itoh Prowriter.. 

W/RS-232C. 

C. Itoh Prowriter 2 
W/RS-232C. 

Ooisywritor 


$399.88 

$809.88 

$734.88 

$789.88 



Daisywriter 2000 48K buffer (P&S) 

soid only w/cable. $1139.88 

Tractor. $149.88 

Sheetfeeder. $739.88 


Diablo 

Oiablo 620 (S). $1029.88 

Diablo 630 (S). $1989.88 

Diablo 630 KéR (S). $2894.88 

630/630KSR Tractor. $289.88 

Star Micronics 



IDSPrism 80 (P&S). $1104.88 

above w/graphics. $1189.88 

above w/sheetfeed .$1294.88 

above w/4-COior .$1539.88 

IDS Prism 132 (P&S) $1289.88 

above w/graphics . $1339.88 

above w/sheetfeed .$1459.88 

above w/4-color .$1899.88 

IDS Microprism (P&S) $579.88 

Okidata 

Microline 80 (P).t33».aa 

Microline 82A (P&S) . 3419.88 


PRINTERS 

Okidata 

82A Roll Paper Holder. $49.88 

Microline 83A (P&S). $879.88 

83A Okigraph ROM. $49.88 

Microline 84 w/graphics & tractor 



Parallel, 200 cps . 
RS-232C, 200 cps 


NEC 



$1024.88 

$1139.88 





NEC 3510 (S). $1929.88 

NEC 3530 (P). $1759.88 

NEC 3550 (P). $2199.88 

3500 Tractor. $239.88 

NEC 7710 (S). $2399.88 

NEC 7720 KSR (S). $2789.88 

NEC 7730 (P). 2399.88 


Information & Orders 

(603J-881 -9855 

Orders Only: (80O)-343-0726 



No Hidden Charges 

FREE UPS shipping on all orders—No extra charge to use credit 
cards—All equipment shipped factory fresh with manufacturer’s war- 
ranty—COD orders accepted ($10 fee added)—No purchase orders 
accepted—No foreign or APO orders accepted—Minimum $50 per 
order—This ad prepared in February: prices are subject to change. 





NEC PC-8023A (P). 8489.88 


Qume Sprint 11 + Parallel or RS-232C. 
includes cables. 81448.88 

Smith-Corona 

Smith Corona TP-1. 8879.88 

Specify either 10 or 1 2 cpi 
& parallel or RS-232C interface 

Transtar 

Transtar130 . 8759.88 


CALL FOR PRICES on Cannon. Data- 
south, Epson, Mannesmann Taity. Pan¬ 
asonic. Ricoh. Silver Reed & others 

lnt#rfac#s 

PKASO card/cable.8188.88 

IDS PKASO card/cable 8159.88 

Parallel Card w/cabie 888.88 

Grappler+w/cable 8149.88 

CBM/PET w/cabfe. tlWft 

TRS-80 Color RS-232C to 

Parallel. w cable. 899.88 

VIC/Commodore 64 Serial Inter¬ 
face w/cable .8148.88 

Parallal Cabla* 

IBM-PC . 838.S8 

TRS-80 Model l/lll. 329.88 

TRS-80 Model 11/16 829.88 

Atari 800 . 838.88 

Osborne-1 (IEEE488). 839.88 

Prism 80/132/M»croPrism Centronics 
cable adapter. 820.00 


Centronics male/male 838.88 

Centrontcs male/female. 839.88 


RS-232C Cabl99 

DB-25 male/male. $29.88 

DB-25 male/female 828.88 


HIGH TECHNOLOGY ATAFFORDABLE PRICES 

THE BOTTOM LINE 


MILFORD, NH 03055-0423 □ TELEPHONE (603) 881-9855 



















































































CP/M 


CP/M The Lingua Franca 

of Operating Systems 


The popular operating System from Digital 
Research offers portability and compatibility to 
markedly expand your computer horizons. 


by John Davidson 


A s thè computer user upgrades 
from cassette tape recorder pro¬ 
gram Storage to floppy or hard disk, 
things get complicated. More programs 
and files can be accessed more quickly, 
but filing, handling, and retrieval proh- 
lems arise even more quickly. 

The computer operating System (OS 
for short) is a “program” that handles 
this housekeeping. It is not a “lan- 
guage” like Basic, Pascal, or ADA. 
Neither does it, alone, do useful and 
interesting things such as word pro¬ 
cessing (like Wordstar), spreadsheet 
calculation (like SuperCalc), or data¬ 
base management (like dBASE II). It 
does provide a working “environment” 
(great buzz word) for both languages 
and applications programs. Some op¬ 
erating systems are interwoven with 
specific languages such as Basic for a 
simpler and more economical package 
at thè cost of versatility. CP/M is not, 
and most if not all of thè microcom¬ 
puter languages in use today are avail- 
able to run with it. 

To write a file (either data or a pro¬ 
gram) to a floppy disk, somewhere 
there must be a record of which sectors 
on which tracks on thè disk already 
hold data and which are available. 
Thus, thè operating system keeps a 
directory on each disk showing thè 
contents of thè disk and thè actual 
track and sector locations on thè disk 
where each program or file is stored. 
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This directory is both for thè OS’s own 
use and to be able to provide a pro¬ 
gram list for thè user. From this infor- 
mation thè operating system can also 
teli what locations are stili open for 
new material. 

Because disk rotation is painfully 
slow in thè microsecond terms of thè 
centrai processor, thè order of use of 
these sectors is important. With se- 
quential disk writes, for example, thè 
centrai processor must access a sector, 
store thè data from memory onto thè 
sector, and then wait for thè next sec¬ 
tor to be used to come under thè drive’s 
read-write head. If thè sector ordering 
were poor, perhaps only one sector 
could be written per disk revolution, 
thè processor would spend most of its 
time waiting, and disk operations 
would be slow. The operating system 
assigns this sector sequence during disk 
write operations. Obviously, thè read 
sequence must follow thè write se¬ 
quence, good or bad, or there will be a 
big messi 

In addition to thè primary function 
of file handling, thè operating system 
usually cares for other computer system 
details such as interfacing peripher- 
als—your page printer for example. 


John Davidson is a Professional Engineer. He has 
been working with microcomputers since 1975. 
Address correspondence to him in Marlow, NH 
03456. 


Much of thè work of thè operating 
system is “transparent to thè user,” as 
they say. Thus, in CP/M, to run a pro¬ 
gram written in Basic you just type thè 
file name of your Basic and thè name 
of your application program. CP/M 
locates thè Basic on thè disk and loads 
it, finds thè application program, 
loads that, and then, with a Run in- 
struction as its parting shot, transfers 
control to Basic. To go one step fur- 
ther, you might be using an accounting 
program that asks Basic (through file 
opening commands) to get CP/M to 
access stili other files of data. Through 
all this you need not (and probably 
don’t) know thè actual locations of any 
of these files on thè disk. In fact, you 
can pour another cup of tea while 
CP/M sets things up and gets them 
going. 

Why is CP/M so popular and ubiq- 
uitous on today’s microcomputers? In 
a word— 

Portability 

CP/M enables very different micro¬ 
computers to exchange disks. A pro¬ 
gram written on, say, an Apple with 
CP/M will generally run without mod- 
ification on a CP/M-equipped Osborne 
or Altos computer and vice versa, as 
long as thè author of thè program has 
not circumvented CP/M and accessed 
thè host computer directly, and if you 
can solve or get around thè format 






compatibility problemi that is rampant 
with thè 5V4-inch disia. (In fact, thè 
program may even run on some Olym¬ 
pia word-processing typewriters!) This 
makes easy program exchange be- 
tween computer people possible—a 
reai benefit, witness thè users’ groups. 
More importantly, it provides a large 
base of apparently identical computers 
for software writers, encouraging thè 
production of many widely-varied 
programs, thus convincing more peo¬ 
ple to instali CP/M and thè circle 
continues. 

This portability is possible because 
thè CP/M System actually consists of 
several relatively independent parts. 
Only one of these parts—thè Basic In¬ 
put/Output System or BIOS—deals 
with thè host computer’s hardware. 
Only thè BIOS must be changed to 
move CP/M from one type of comput¬ 
er to another. The rest of thè operating 
System remains thè same. Thus thè 
running program only has to teli CP/M 
to send a message, say, to thè printer. 
A routine in thè BIOS provides thè ad- 
dress òf your printer and directs thè 
message properly. 

There is another reason CP/M is so 
widespread— 

Compatibility 

Often when an operating System is 
revised or replaced, programs running 
under thè old System must have modi- 
fications to run under thè new System. 
Sometimes it can’t be done. 

CP/M operating systems are “up- 
ward compatible.” A program pre- 
pared to run on an older CP/M (say, 
version 1.4) should work fine on a 
newer one (say version 2.2). “Down- 
ward compatibility”—running a 
CP/M 2.2-based program on a CP/M 
1.4 System with fewer features—may 
be a problem. This is usually a moot 
point because you aren’t apt to trade in 
your new operating System for an older 
one, and your main concern is to pro- 
tect thè program collections that you 
are building up. 

Compatibility is of particular inter¬ 
est just now. Most of thè CP/M-com- 
patible programs on thè market and in 
use today were prepared for version 
2.2. CP/M Plus (version 3.0) has just 
been announced. If you get it, your 2.2 
programs should run just fine on thè 


Plus, On thè other hand, if you cling to 
your 2.2, beware when thè Plus ap- 
plications programs come out. 

A ROSE by Any Other Name 
Than ROSE.COM Won’t Run 

Files on a disk are referred to by 
their titles—names of up to eight char- 
acters, a period, and an “extension” of 
up to three more characters. The ex¬ 
tension normally suggests thè nature of 
thè file— PROG.COM, PROG.ASM, 
PROG.HEX, PROG.DAT, and PROG.DOC, 
for example. In this group, PROG.ASM 
is thè assembly language listing used by 
thè assembler (ASM.COM, another pro¬ 
gram entirely, mentioned below) to 
create PROG.HEX, a hexadecimal 
machine language file that is con- 
verted by LOAD.COM (another separate 
program) into thè actual machine lan¬ 
guage code to form PROG.COM. 
PROG.COM is thè actual command 
file or “runnable” program. PROG.DAT 
would be data used by thè PROG pro¬ 
gram, and PROG.DOC would be an 
ASCII text file—English language in- 
structions on thè use of PROG. All these 
files could occupy thè same disk. 

There are conventions governing 
thè use of extensions. Some are arbi- 
trary, but others are mandatory. For 
example, only a .COM (command) file 
can be directly executed by CP/M, and 
thè assembler will only work on .ASM 
files. CP/M allows wild cards—thè as- 
terisk (*) and thè question mark 
(?)—for some uses. The asterisk substi- 
tutes for anything in thè field, either 
name or extension, while thè question 
mark substitutes for any single charac- 
ter. Thus, DIR PROG.* would provide a 
listing of all thè files mentioned above, 
and ÉRAPROG.D?? would eliminate thè 
data and documentation files. 

A> Means “Talk to Me” 

As CP/M loads, it announces itself 
by displaying its name, its memory 
size, and its version number. Then it 
prompts with A>, meaning “Your 
wish?” (A is thè disk drive presently in 
use.) It is looking for a command, 
again a string of up to eight characters, 
followed by a carriage return. It checks 
what you type in against its list of inher- 
ent commands and, with a match, exe- 
cutes immediately. No match sends 
CP/M to thè disk directory looking for a 


command file (a file with thè .COM ex¬ 
tension) of thè name you entered. This 
can be either your program or one from 
thè originai CP/M disk. If thè disk has 
no .COM file of thè name you entered, 
CP/M repeats your keyboard entry with 
a question mark, followed by another 
A>. This time A> means “Want to try 
that again?” (Computers are so 
patient.) 

Inherent Commands 

CP/M has a limited repertoire of in¬ 
herent or “direct” commands that are 
built into thè System: 

• ERA (erase) deletes files and frees 
disk space for other use. It doesn’t ac¬ 
tually erase thè file but notes on thè 
disk directory that thè program is no 
longer to be listed, and its space is 
available. I mention this detail because 
once in a while a file will be erased in 
error. With CP/M’s method of erasure, 
you can sometimes retrieve most or all 
of an erased file if it hasn’t been over- 
written, and if thè rescue is important 
enough for thè special procedures that 
must be used. 

• DIR (directory) lists thè names of all 
thè files or programs on thè disk you 
are using. It does not show you where 
they are on thè disk or how long they 
are. These features are available 
elsewhere, but they won’t fit into thè 
resident operating System. 

• REN (renarne) changes thè name of a 
file or program. 

• SAVE writes a program from main 
computer memory into a disk file. This 
command is not often used. Reading a 
program from disk does not destroy thè 
disk file, so unless thè program has been 
changed it needn’t be saved again. Most 
of thè programs that create files (such as 
Basic) have their own save commands 
within thè language. 

• TYPE lists out ASCII text material 
such as .DOC (documentation) or .ASM 
(assembly) files on thè screen. Typing 
command files is more exciting but not 
generally recommended—CP/M will 
throw random bytes about thè System, 
reposition thè cursor, “ring” thè bell, 
erase thè screen, and so forth. 

• USER is a hand-me-down from 
larger systems. Basically, it allows up 
to 16 people (or 16 different projects) 
to share thè System and thè disks at dif- 
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ferent tìmes without running into each 
other. Thus, user 3 running DIR will 
not see and cannot access files or run 
programs belonging to user 7. This 
does not allow simultaneous use of thè 
computer by several different people. 
For that, you need major software and 
hardware changes. 

Transients Aren’t All Itinerants 

There is a second set of CP/M com- 
mands, transients, that is fumished on 
your master CP/M disk. As opposed to 
direct commands, these transients are 
.COM file programs that must be 
copied onto each disk from which they 
are to be used. They are not sacred, 
and, with thè excepdon of SYSGEN 
(assuming that you want to have more 
than one System disk), they are not es- 
sential; but they are useful. Similar 
programs (usually called Utilities) are 
available from users’ groups and inde- 
pendent vendors. 

The CP/M transients provided by 


Ci relè 238 on Reader Service card. 

JOIN 

ZMicro 

G>'Op 

Over 3,000 members 
worìdwide 

• Co-op Newsletter (6-10 
Issues/yr.) 

• Latest Information 

• Software reuiews and 
comparisons 
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• Software and hardware at 
discount prices 
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to make software decisions 
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Membership $5.00 

iMicro (ò'Op 

P.O. Box 714 
St. Charles, IL 60174 
Phone (312) 232-1777 
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Digital Research include thè following: 

• MOVCPM changes thè amount of 
memory thè System makes available to 
your transient program. The officiai 
Digital Research System comes config- 
ured for 20K of memory. MOVCPM can 
then be used to change CP/M to any 
size that your hardware can accom- 
modate. 

• SYSGEN transfers “thè System,” thè 
actual CP/M operating program, to a 
disk, either from another disk if it is ai- 
ready configured for thè memory size 
you want, or from main memory if 
you have changed thè memory size 
with MOVCPM. The CP/M System must 
be present on every disk used to start 
up thè computer. 

• LO ad converts a hex listing (see be- 
low) to a .COM file ready for execution. 

• STAT is a multipurpose gem. It tells 
you about disk space and program 
lengths. It sets files to “read only,” as 
protection from change or erasure (if 
everything is working properly—no 


guarantees if your System malfunc- 
tions). It sets files to “system,” making 
them invisible to thè DIR command but 
available to all users working with user 
numbers. And it does many natty 
things for you in redirecting computer 
inputs and outputs among various 
devices (such as several different 
printers or a modem) if your hardware 
is elaborate enough to use it. 

• PIP (Peripheral Interchange Pro¬ 
gram) does neat tricks in moving files 
around between disks and devices, 
and, if told to, in modifying them in 
beneficiai ways in thè process: adding 
line numbers, changing or checking 
format, and so forth. Its most common 
use is to copy a file from one disk to 
another and then verify thè copy. 

• ASM is an 8080 assembler. It takes 
8080 assembly language mnemonics 
for a program and converts them to 
hex code that LOAD can, in tura, 
transform into a working machine 
language .COM file (if there are no 


Bibliography for CP/M 2.2: 

• Seven manuals in a one-volume set: 

An Introduction to CP/M Features and Facilities 

ED: A Context Editor for thè CP/M Disk System, User’s Manual 

CP/M Assembler (ASM), User’s Guide 

CP/M Dynamic Debugging Tool (DDT), User’s Guide 

CP/M 2.2 Alteration Guide 

CP/M 2.2 Interface Guide 

CP/M 2.2 User’s Guide 

Digital Research, PO Box 579, Pacific Grove, CA 93950 
Free from thè vendor with CP/M 

Aside from CP/M itself, these manuals are thè Bible for thè system. Very 
complete, but somewhat difficult to use for working reference. 

• Osborne CP/M User’s Guide 
by Thom Hogan 

Osborne/McGraw-Hill, 630 Bancroft Way, Berkeley, CA 94710 
$15.95 from your bookseller 

A simple but comprehensive guide, with sample commands and clear 
explanations. 

• CP/M Summary Guide 
Brace A. Brigham, Editor 

The Rosetta Stane, PO Box 35, Glastonbury, CT 06025 
$7.95 ppd. from thè publisher 

Command set notes. Little explanation, but valuable to have at hand 
when using CP/M. Also covers CBasic, Microsoft Basic, TEX, MAC, 
and Despool. 

• Using CP/M (A Self-Teaching Guide) 
by Judi Fernandez and Ruth Ashley 

John Wiley & Sons, 605 Third Avenue, New York, NY 10158 
$12.95 from your bookseller 
The subtitle tells it all. 





"While this set of Utilities won't conquer 
thè (computer) world, it is certainly a good, 
adequate start until you find out exactly 
what paths in computing you want to take." 


mistakes in thè assembly code, of 
course). Note that 8080 code almost 
always works with a Z-80 processor, 
but not vice versa. Like any good 
assembler, ASM can use “labels” for 
jumps and calls (similar to target line 
numbers for Goto or Gosub in Basic). 
It handles “pseudo-operations”—as¬ 
sembly statements that don’t result in 
object code directly, but teli thè assem¬ 
bler such details as where you want thè 
program to be located in memory or 
that you want a certain amount of 
memory space reserved for data. 

• DDT (Dynamic Debugging Tool) is, 
of course, for killing bugs in machine 
language programs. While use of this 
type of DDT is not controlled by thè 
Environmental Protection Agency yet, 
some types of program bugs have de- 
veloped a resistance to it. Even so, it 
has many useful features. It displays 
machine language files in both hex and 
ASCII codes at thè same time. It disas- 


sembles thè program—recreates thè 
assembler file from thè machine 
language (without thè labels, com- 
ments and explanations, alas). It traces 
thè program—runs it one step at a 
time, teÙing you after each step what 
has happened. And it does hex math. 
Want to know what FA03h minus 
B021h is, fast? DDT’s H command will 
teli you. DDT has more features, but 
this gives you thè idea. 

• ed (editor) creates or modifies text 
or assembler files. For thè writers 
among us, forget it! ED doesn’t know 
thè difference between a noun and a 
verb. Of course, I jest. We’ve had 
spelling checkers around for a while, 
but I know of no computer program, 
large or small, that can handle English 
grammar in thè reai world. Even in its 
own realm, however, I find ED barely 
usable, and then only if nothing else is 
available. I consider it distinctly user- 
hostile with its intricate command set, 
its inability to handle its own program 


buffering in and out of thè disk files, 
and its unwillingness to display thè text 
except on explicit command. Perhaps 
if I had spent a couple of hundred 
hours more with it. . . 

• SUBMIT allows you to place a num- 
ber of sequential keyboard commands 
in a disk file and then have thè com¬ 
puter execute them in turn, automati- 
cally. There are tricks you can do with 
SUBMIT, but its biggest benefit is to 
keep you from going glassy-eyed star- 
ing at thè screen while waiting for one 
command of a repetitive series to finish 
so you can key in thè next. 

While this set of Utilities won’t con¬ 
quer thè (computer) world, it is cer¬ 
tainly a good, adequate start until you 
find out, from hands-on experience 
and experimentation, exactly what 
paths in computing you want to take 
and what features you really need. We 
hope that, in thè coming months, in¬ 
cider will be able to provide you with 
hints and guidance in this search. ■ 
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C00S0L COMPUTER PRODUCTS 


OKIDATA PRINTERS 


EPSON PRINTERS 


SANYO COMPUTER 





• OKIDATA 82A, 83A, 84A.CALL 

• OKIDATA 92A, 93A. & OTHERS.CALL 

• 82A TRACTOR S55-OKIDATA 80.$325 

OTHER PRINTERS 

• NEC PC-8023A-C. CALL 

• NEC 3550 . CALL 

• NEC 3510.3515, 3530 . CALL 

• NEC 7710. 7715.7730.7720.7725 CALL 

• C.IT0H 8510AP CALL • 8510ACD CALL 

• C. ITOH 1550 APCALL-1550ACD. CALL 

• C IT0H F10-40PU&F10-40RU CALL 

• C IT0H FI0-55PU « F10-55RU CALL 

• STAR-GEMIN1-10 CALL 

• TALLY MT 160L CALL 

• TALLY MT 1602 MT 1605 SI495 

• TALLY MT 1802 MT 1805 SI 795 

• DIABLO 630 and 620 SERIES CALL 

• QUME SPRINT 5 45/RO.KSfì 8 55/RO.KSR CALL 

• ANADEX ADX-9500-P, ADX-9501 -P S1295 

• C0MREXCR-1-S.CR-1-C.CR-1-0 CALL 

• SMITH-CORONATP-1 CALL 

• BR0THER Hft-1 CALL 

• OAISY WRITERS. CALL 


• EPSON FX-80.NEW.CALL 

•EPSON MX-80 F/T GRAFTRAX PLUS.CALL 

•EPSON MX-100 GRAFTRAX PLUS.CALL 


MODEMS 

• HAYESSMARTMODEM (300 BAUO) S229 

• HAYES SMART MODEM (300 & 1200 BAUO) S595 

• RS-232C COMPATIBLE 

• FULL and HALF-DUPLEX 0PERATI0N 
WITH BOTH 

• TOUCH T0NE and PULSE DIAL0G 

• AUTO-ANSWER/DIAL/REPEAT 

• COMPLETELY PR0GRAMMABLE 

• BUILT-IN AUTO MONITOR 

• STATUS AT A GLANCE 

• DIRECT-CONNECT DESIGN 


• HAYESCHRONOGRAPH S209 

• N0VATI0N AUT0-CAT AUTO ANS $219 

• SIGNALMAN MARK 1 (300 BAUDI S89 

• U D S 103 0ALP (300 BAUD) $175 

• U.0.S 103 JLP (300 BAUD) S199 

• U D.S 202 SLP (1200 BAUD) $249 


• SANYO MBC-tOOO S1599 

• SANYO MBC-2000 $2699 

• SANYO MBC-3000 S4999 

• Above with CP/M, BASIC, and olher software. 

• SANYO ACCESSORIES& SOFTWARE CALL 

OTHER COMPUTERS 

• COLUMBI AComputer Systems CALL 

• ADDSCompuler Systems . CALL 

• NEC PC-8001 A. PC-8012A, PC-8031A.and 
JB-1201 (NEC SYSTEM) with CP/M 

and BASIC. S2149 

• NEC Other CPU's and Software CALL 

• DYNABYTE 5605-6-1 $5999 

• DYNABYTE OTHER SYSTEMS CALL 

• XEROX 820 SYSTEM w/5 1/4" DRIVES S2499 

• XEROX 820 SYSTEM w/8" DRIVES S2995 

• SOFTWARE FOR THE ABOVE CALL 


COOSOL SPECIAL DISCOUNTS 

APPLE SOFTWARE. CALL 

IBM SOFTWARE. CALL 


COOSOL, INC. P.O. BOX 2642, COSTA MESA, CA. 92626-2642 OR phone 7 DAYS Calif. (714)545-2216 
COMPUTER BARON 3017B-HARBOR BLVD. COSTA MESA, CA 92626 mSJSSIS 
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Bent on Business 

by Gregory R. Glau 


Ah, Payday! 

A h, Payday!—that most dreaded i 
time, when thè businessman i 
hunts under rocks and bushes, in 1 
trees and shrubs, digging here and ] 
begging there, all to gather enough ; 
cash to pay thè help. To add insult to 
injury, many of us do our payroll by ' 
hand, committing math errors in : 
taxes and FICA and union dues, los- ■ 
ing pennies in this account and i 
nickles in that, and then having to i 
spend dollars to find thè darn things 
again! j 

But one day, as if riding a white 1 
horse, along comes an Apple to thè < 


rescue. But what’s that? You want to 
use your Apple to figure your payroll, 
but you don’t want to spend $400 for 
payroll software? You want to do it 
yourself? 

Well, I did, too. So I sat down and 
wrote a payroll program. The basic 
math, files and printouts weren’t too 
difficult to handle. What I couldn’t 
figure out was how to separate all thè 
data by quarters. 

You see, accountants don’t want 
just thè totals. They want to know 
how much each employee earns in 
each three-month period. And not 


just how much thè worker receives, 
but thè amount of FICA (Social Se- 
curity) removed, thè amount of 
federai taxes taken out, thè dollars 
deducted for state taxes. . . and insur- 
ance, and dues, and anything else 
that alters thè payroll. 

And it all has to balance! 

Well, for about a year I cheated. 
After all, I could get various totals. 


Gre g Glau ou>ns and runs a heatìng and air con- 
ditioning firm. Address correspondence to him 
at PO Box 1627, Prescott, AZ 86302. 



Figure 1. Payroll program flow. 



150 Èider May 1983 






































HARDWARE 


Our Prices are Insane. 



OUR 

MONITORS 

PRICE 

AMDEK 


Vidio 100-12” 

90.00 

Vidio 310-12" 

195.00 

Color 1-13” 

335.00 

Color 11-13” 

725.00 

Color 111-13” 

430.00 

ELECTROHOME 

Color Receiver/Monitor-19" 

715.00 

Color Receiver/Monitor 25" 

830.00 

ECM 1301-Hi Res. 13” 

1550.00 

NEC 

12” Color 

320.00 

USI 12" Green 

145.00 

USI 12” Amber 

165.00 

PRINTERS 

OUR 

PROWRITER 

PRICE 

8510AP - Parai lei 

445.00 

8510ACD-Serial 

585.00 

2-1550-Parallel 

715.00 

2-1550-Serial 

STARWRITER 

750.00 

F 10-40PU-par. 

1325.00 

F 10-40RU-Serial 

1325.00 

OKIDATA 

Microline 82 A FT 

435.00 

Microline 83A FT 

685.00 

Microline 84A FT (S) 

1095.00 

Microline 84A FT (P) 

NEC 

1065.00 

8023A W/Graph. Par. 

480.00 

Smith Corona TP 1 

625.00 

DISK DRIVES 

OUR 

PRICE 

AM-Disk-3-500K 

770.00 

Rana Elite 1 

310.00 

Rana Elite II plus 

585.00 

Rana Elite III 

660.00 

Elite Controller 

115.00 

Micro SCI A2 

345.00 

Micro SCI w/contr. 
MODEMS j 

Lexicon Lex 11 300 Baud 

425.00 

Lexicon Lex II 300 Baud w/battery 

OTHERS 

RETAIL 

CP/M Card 

399.00 

Z-Card 

169.00 

Smarterm 

345.00 

Dispatcher 

139.00 

Printer Mate 

99.00 

Add-Ram 

99.00 

Commodore Sadie Dual 

242.00 

Commodore ADA 1600 Par. 172.00 
Commodore ADA 1450serial 187.00 

Apple Tymac PPC-100-pa 

139.00 

X-Y Plotter 10”xl4” 

949.00 


BUSINESS 

RETAIL 

OUR 

PRICE 

D-Base II 

700.00 

455.00 

DB Master 

229.00 

155.00 

DB Master Utility pak 1 or 2 

99.00 

65.00 

Financial Planner 

700.00 

460.00 

Bottom Line Strategist 

400.00 

290.00 

Payroll 

395.00 

285.00 

Accounts Recievable 

395.00 

285.00 

General Ledger w/payable 

495.00 

360.00 

Word Star 

375.00 

200.00 

Mail Merge 

125.00 

80.00 

Speli Star 

195.00 

115.00 

Cale Star 

195.00 

115.00 

Condor Jr 

195.00 

115.00 

Condor 1 

295.00 

175.00 

Condor 3 

650.00 

375.00 

Word Handler 

199.00 

143.00 

Sensible Speller 

125.00 

80.00 

Reai Estate Analyzer II 

195.00 

135.00 

Pascal Programmer 

125.00 

85.00 

The Dictionary 

99.00 

65.00 

Visicalc 3.3 

250.00 

175.00 

Visitrend or Visiplot 

300.00 

220.00 

Piewriter 

149.95 

95.00 

The General Manager 

149,95 

95.00 

Data Fax 

199.00 

135.00 

Versaform 

268.00 

230.00 

Supercalc III Televidìo 

295,00 

190.00 

Supercalc 100 

295.00 

190.00 

ACCESSORIES 


OUR 

PRICE 

Interafce for Color 1 


20.00 

Interface for Color II & III 

35.00 

Expansion Board MBC AP 16K 

100.00 

PrinterRibbons/12 


45.00 

T. G. Paddles 


28.00 

T. G. Joysticks 


42.00 

Hard Disk 1115 MEG 


1600.00 


OUR 

PRICE 

125.00 

130.00 

OUR 

PRICE 

320.00 

135.00 

290.00 

120.00 

85.00 

85.00 

225.00 

135.00 

150.00 

90.00 

800.00 


Hard Disk III 2x10 MEG 


Cables 

MPC AP96-Upper & Lower 
Case Rom 

System Saver - Apple II Fan 
Head Cleaning Kits 
The Grappler 
Videx Enhancer II 
Memory Board 16K 
Memory Board 64K 
Interface Modules 
Microsoft Ram Card 

MEDIA 

Maxell 5‘A SSDD/10 
Elephant 5‘A DSDD/10 
Verbatim 5V< SSDD/10 
Elephant 8”SSSD/10 
IBM Compat. 


3300.00 


Cali 

22.00 

73.00 

23.00 

137.00 

120.00 

488.00 

525.00 

85.00 

74.00 

OUR 

PRICE 

30.00 

31.00 

31.00 

26.00 


ENTERTAINMENT 

RETAIL 

OUR 

PRICE 

Shooting Arcade 

29.95 

20.95 

Sands of Egypt 

39.95 

27.95 

Moonshuttle 

34.95 

24.95 

Zaxxon 

39.95 

27.95 

Graphic Master 

39.95 

27.95 

Graphic Generator 

24.95 

19.95 

Arcade Machine 

44.95 

29.95 

Chop Lifter 

31.95 

22.95 

Space Warrior 

24.95 

16.95 

Apple Panie 

29.95 

20.95 

Galactic Empire 

24.95 

16.95 

David's Midnight Magic 

34.95 

23.95 

Fathom’s 40 

34.95 

24.95 

Galactic Trader 

24.95 

16.95 

Galactic Revolution 

24.95 

16.95 

Chess 

69.95 

49.95 

Checkers 

49.95 

38.95 

Odin 

49.95 

38.95 

Star Blazer 

31.95 

21.95 

Shark Trap 

19.95 

14.95 

Space Quarks 

29.95 

20.95 

Thief 

29.95 

20.95 

Frogger 

34.95 

23.95 

Combat 

24.95 

16.95 

Snack Attack 

29.95 

19.95 

Casino 

39.95 

26.95 

Lunar Lander 

20.95 

14.95 

Rosen’s Brigade 

34.95 

25.95 

Tumble Bugs 

29.95 

21.95 

Canyon Climber 

29.95 

21.95 

O'Riely's Mine 

34.95 

25.95 

Castle of Wolfenstein 

29.95 

21.95 

Robot Wars 

39.95 

27.95 

Crossword Magic 

49.00 

28.95 

Math Magic 

88.95 

68.95 

Gin Rummy 

29.95 

21.95 

Apple Spice 

29.95 

20.95 

Backgammon 

19.95 

14.95 

Eliminator 

29.95 

20.95 

Planetoids 

24.95 

17.95 

Tunnel Terror 

29.95 

20.95 

War 

24.95 

17.95 

Dueling Digits 

29.95 

21,95 

Martian Raider 

19.95 

14.95 

Multi Sound Synthesizer 

19.95 

14.95 

Genetic Drift 

29.95 

20.95 

Seafox 

29.95 

19.95 

Serpentine 

29.95 

23.95 

Deadly Secrets 

29.95 

21.95 

Track Attack 

29,95 

21.95 

Strar Cross 

39.95 

26.95 

Curse of Ra 

19.95 

13.55 

Alibaba & thè 40 Thieves 

32.95 

21.95 

Bandits 

34.95 

23.95 

Cannonball Blitz 

34.95 

23.95 

Wizardry 

49.95 

35.95 . 

Kabul Spy 

34.95 

23.95 

Adventure to Atlantis 

40.00 

27.95 

Oo-Topos 

32.95 

21.95 

International Grand Prix 

29.95 

19.95 

Country Fair 

29.95 

21.95 

Pig Pen 

29.95 

21.95 


Order Any Day Any Time 

(20J)JJJ- 0400 




niversal Software 


We accept Master Card, Visa include card no. & expiration date. For faster n a» p 9/ 

delivery send money orders, certified checks. Personal checks, allow clearance i. v. BOX O / 

time. Shipping & handling charges extra depending on size of thè package. _ - SIzr si ^r 

Conn. residents, please add 7.5% sales tax. Ask for FREECATALOGUE. D Di- CT ^ 

These and many more. JUST CALL. 


Prices subject to change without notice. 


Cirele 357 on Reader Service card. 
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Bent on Business 


so it was pretty simple to get thè fig- 
ures for individuai quarters by sub- 
tracting. But it was silly—all those 
manual calculations with my Apple 
sitting there, watching. And prob- 
ably laughing at me thè whole time. 

The problem was that I didn’t un- 
derstand double-dimension arrays. I 
couldn’t remember thè difference be- 
tween a column and a row, and then 
that bit about DIMensioning. It just 
didn t seem worth thè trouble. 

But, to handle payroll properly, I 
had to, and so this month TU share 
my experience. Hopefully, it will be 
of help to you. If you are already 
sharp on arrays, then send some sug- 
gestions along to me—okay? 

The basic flow of our payroll pro¬ 
gram is shown in Figure 1. Òqr peo- 
ple are paid on a weeldy basis, which 
simplifies things. If they are getting 
vacation pay this week, we enter 
them twice and print a separate 
vacation check. 

The program handles one employ- 
ee at a time (not feasible, I realize, for 
large applications). This way every- 
thing that happenis to thè figures ap- 
pears on thè screen, so we’re more 
likely to notice an error before every- 
thing gets SAVEd. When done with 
thè figuring and saving, thè program 
prints a summary and thè payroll 
checks. 

Arrays in Pay 

The easiest way for me to under- 
stand thè quarterly totals concept 
was to draw a little chart, like Figure 
2, to represent a blank array, named 
QT. It’s like an orderly cluster of 
empty boxes, waiting to be filled. I 
remember that a column in a double- 
dimension array is similar to thè col- 
umns in old buildings—it goes up 
and down. Rows, on thè other hand, 
are like rows of letters—they go 
across. 

The array filled in with thè vari- 
ables that represent payroll dollars is 
illustrated in Figure 3. As you can 
see, thè printout of an array is what 
we would cali a table. 

In Basic array notation, thè first 
numerai designates thè column and 
thè second thè row. So, QT(3,4) 
means thè “box” in column 3, row 4 
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Listing 3. Displaying data for thè chosen quarter. 


4080 

PRINT 

"2. OVERTIME PAY 

Il a 

9 

QT (QR,2) 

4090 

PRINT 

"3. GROSS PAY 

» • 

9 

QT (QR,3) 

4100 

PRINT 

"4. SOC SECURITY 

“i 

QT<QR,4> 

4000 

REM DISPLAY SECTION 



4010 

HOME: 

PRINT 



4020 

PRINT 

N*, S* 



4030 

PRINT 




4040 

PRINT 

“THIS DATA IS FOR 

QUARTER ";QR 

4070 

PRINT 

"1. REGULAR PAY 

"I 

QT(QR,1) 


Lifting continued. 


2090 PRINT "ENTER THE QUARTER YOU WANT 
TO SEE:" 

2100 INPUT QR 
2110 IF QR > 4 THEN 2090 
2120 IF QR < 1 THEN 2090 
2130 GOSUB 4000: REM DISPLAY 

Listing 2. To specify thè quarter to be displayed. 


17400 REM ADD TO TOTALS 


17410 

QT 

(QR,1) 

= 

QT 

(QR,1) 

+ 

R: 

REM 

REGULAR PAY 

17420 

QT 

(QR, 2) 

ac 

QT 

(QR,2 > 

+ 

0: 

REM 

OVERTIME 

17430 

QT 

(QR,3) 

- 

QT 

(QR, 3) 

+ 

T: 

REM 

TOTAL PAY 

17440 

QT 

(QR, 4) 

ss 

QT 

(QR,4) 

+ 

S: 

REM 

SOCIAL SEC 

17450 

QT 

(QR,5) 

- 

QT 

(QR, 5) 

+ 

F: 

REM 

FEDERAL TAX 

17460 

QT 

(QR,6) 

* 

QT 

(QR, 6) 

+ 

A: 

REM 

AZ TAX 

17470 

QT 

(QR,7) 


QT 

(QR,7) 

+ 

I: 

REM 

INSURANCE 

17480 

QT 

(QR,8) 

» 

QT 

(QR, 8) 

+ 

M: 

REM 

MISC. 

17490 

QT 

(QR, 9) 

- 

QT 

(QR,9) 

+ 

B: 

REM 

NET PAY 


Listing 1. Adding weekly figures to QT for quarterly totals. 






Bent on Busines 


Listing continued. 


of array QT. It helps to remember 
that C comes before R in thè alpha- 
bet, so thè first figure is thè column 
(C) and thè second is thè row (R). 

The nine variables shown in Fig¬ 
ure 4 hold weekly totals in nine finan- 
cial categories for each employee. We 
also save things like thè employee’s 
name, Social Security number, and 
so on. All we have to do to code thè 
program is to insert thè data into thè 
proper “boxes” in thè array. 

One of thè early Iines in thè pro¬ 
gram, 100 DIM QT (4,9), “dimensions” 
thè array—a fancy term to say saves 
room for thè array in thè Apple’s 
memory. It sets up QT as four col- 
umns wide (for thè quarters) and 
nine rows deep (for thè financial cat¬ 
egories) . 

Once thè nine weekly amounts are 
computed, thè routine in Listing 1 
adds them to thè QT array, yielding 
quarterly totals. You’ll notice that thè 
numbers for thè variables like regular 
pay, insurance, and so on, match thè 
list in Figure 4. 

We input thè quarter we’re work¬ 
ing on early in thè program as thè 
variable QR. As QR changes we keep 
track of thè same nine items, but for 
different quarters. QT (1,1) is thè 
regular pay for thè first quarter, and 
QT (4,1) is thè regular pay for thè 
fourth quarter. 

This approach also overcomes thè 
limits of your Apple’s screen. You can 
only display 24 lines of 40 characters 
each at a time. There’s no way to get 
four quartfers’ worth of payroll data 
on thè screen at once for viewing or 
correcting. However, there is room 
for one quarter. With thè double- 
dimension array QT, you can select 
thè quarter to see. 


1. Regular pay.R 

2. Overdine pay.O 

3. Cross pay.G 

4. Social Security (FICA) deducted.S 

5. Federai Tax deducted.F 

6. Arizona Tax deducted.A 

7. Insurance deducted.I 

8. Misceìlaneous deducted.M 

9. Net pay.B 

Figure 4. Payroll program variables. 


4110 

PRINT 

"5. FEDERAL TAX 

"i 

QT(QR, 5) 

4120 

PRINT 

"6. ARIZONA TAX 


QT(QR,6) 

4130 

PRINT 

"7. INSURANCE 

*• ■ 

9 

QT (QR,7) 

4140 

PRINT 

"8. MISC. DED 

"i 

QT(QR,B) 

4150 

PRINT 

"9. NET PAY 

"J 

QT(QR,9) 


4190 PRINT "ANSWER 1 TD SAVE THIS DATA" 

4200 PRINT “ANSWER 2 TO CORRECT THIS DATA" 
4210 PRINT "ANSWER 3 TO SEE OTHER QUARTERLY 
DATA FOR THE SAME EMPLOYEE." 

4220 INPUT Q 

Listing 4. Choice of action after thè quarter is dispìayed. 


Itern 

lst Qtr. 

2nd Qtr. 

3rd Qtr 

. 4th Qtr. 

Regular Pay..QT(l,l) 

QT(2,1) 

QT (3, 1 ) 

QT(4,1) 

Over ti me 

Pay.QT(1,2) 

QT(2,2) 

QT(3,2) 

QT(4,2) 

Grò ss Pay 

....QT(1,3) 

QT(2,3) 

QT(3,3) 

QT (4,3) 

Social Sec...QT(1,4) 

QT(2,4) 

QT(3,4) 

QT(4,4) 

Federai Tax..QT(l,5) 

QT(2,5) 

QT (3,5) 

QT(4,5) 

Arizona Tqx..QT(1,6> 

QT(2,6) 

QT (3, 6) 

QT(4,6) 

Insurance 

....QT(1,7) 

QT(2,7) 

QT (3, 7) 

QT(4,7) 

Mi se. ded 

....QT(1,8> 

QT(2,8) 

QT(3,8) 

QT (4, 8) 

Net Pay.. 

....QT(1,9) 

QT(2,9) 

QT(3,9) 

QT (4, 9) 

For 

exampie: 




QT 

<1,1) is thè 

regular 

pay for 

Quarter 1. 

QT 

(3,3) is thè 

gross pay for Quarter 3. 

QT 

(4,9) is thè 

net pay 

for Quarter 4. 


Figure 3. Quarterly payroll array QT. 
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Bent on Business- 


" Arrays will save you a 
lot of programming time, 
when you're working 
with many numbers." 


The code that displays thè quarter- 
ly totals is also used to change them if 
needed. The first step is to request thè 
employee’s number and load this per- 
son’s data from thè quarterly pay 
disk. Then thè program goes on lo thè 
sequences in Listing 2 and 3. 

The lines in Listing 4 enable thè 
user to view another quarter’s infor- 
mation. When you answer “3” to in¬ 
dicate that desire thè program re- 
turns to line 2090 to ask which 
quarter you want. You input your 
answer, which becomes QR, and 
then return to line 4000 for thè dis¬ 
play section. Thus can you “Hip” 
through thè four quarters of a year’s 
salary information, one quarter at 


a time. 

Of course, thè program has rou- 
tines to print out this information for 
an individuai employee, or for all 
employees. These routines access this 
same array, and print it much as 
shown here. 

The Point 

The point is, of course, that by 
changing only one variable—thè col- 
umn number in thè array—you can 
control similar information efficient- 
ly. In this particular application, we 
keep track of nine categories of infor¬ 
mation per employee, for each of four 
quarters, or 36 separate amounts. 
And we have almost instant access to 
those figures. 

The array is much simpler than a 
long list. If, in a payroll program, 
you had 20 employees and wanted to 
keep track of those game 36 items, 
your list would be 20 people times 36 


items, or 720 amounts long. With an 
array to handle thè same chores you 
work with only 36 figures. 

Just remember that an array is a 
cluster of numbers or characters. You 
can also have a string array for alpha- 
numeric characters—perhaps to 
store words or phrases, 

Double-dimension arrays, also 
called matrices (singular, matrix) in 
some circles, have two dimensions, 
with values or characters going in 
two directions, as in a table. Single- 
dimension arrays are also possible. 
They extend in only one direc¬ 
tion—basically like a list. 

The next time you have to create a 
file, try using an array. Once you get 
thè idea, arrays will save you a lot of 
programming time, especially when 
you’re working with many numbers, 
as in a payroll program. 

Now then, if we only had enough 
money. . . ■ 
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SYSTEM REFERENCE CARDS 

"This Is a quality document and is beautifully con- 
ceived and produced... .1 am in awe of your magnificent 
document." 

Dayton, Ohio 


1 Send Check or Money Order 


CARD 

ORDER NO. 

PRICE 

MODEL 1: BASIC & Assembler 

FC1002 

$4.95 

MODEL 1: BASIC Only 

FC1001 

2.95 

MODEL II: BASIC & Assembler 

FC1005 

5.95 

MODEL III: BASIC & Assembler 

FC1003 

5.95 

MODEL III: BASIC Only 

FC1004 

3.95 

COLOR: BASIC & Extended 

FC1006 

4.95 

POCKET: BASIC 

FC1009 

2.95 

APPLE II + Il PLUS: BASIC & 6502 

FC1008 

4.95 

APPLE II + Il PLUS: BASIC Only 

FC1007 

3.95 




HOMI IH 


F*--=t ) 






/^ 5 \ 

RAINBOW 

CERTIFICA TKW 
SEAL 


NEW! 

SVC FC1013 $2.95 
MODEL II 

Commands & Utilities 
FC1010 $3.95 

Z80 

MICROPROCESSOR 

FC1011 $4.95 

ZX80, ZX81 and 
Timex Sinclair 
1000 

FC1012 $5.95 


Cali TOLL-FREE for Credit Card Orders 1-800-258-5473. Or, send your order with 
payment or complete credit card information to: 

WAYNE GREEN BOOKS • Retali Sales • Peterborough, NH 03458 
Enclose $1.00 per order for shipplng and handling 




APPLE- 


Il * II PLUS 


Rimari appìle- 


- Il SII PLUS 


*TBS-80 is a Ftoflistered Trademark of Tandy Corp. 

APPLE ia a Reglstored Trademark ol APPLE COMPUTER, INC. 
’ZBO is a Ragistared Trademark of Zllog, Ine. 
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Circle 350 on Reader Service card. 


A MUST FOR 
APPLE H USERS 


THE ORIGINAI. REMINDER CALENDAR 
******************* 

IT'S AN ELECTRONIC DATE BOOK AND 
MONTHLY PLANNER'IT REMINDS YOU OF 
YOUR APPOINTMENTS.MEETINGS.EUENTS,AND 
SPECIAL DATES ALL AUTOMATICALLY,AND 
IN JUST SECONDS.YOU ENTER YOUR OWN 
DATES IN JUST A FEW SECONDS TOOI 
HOLIDAYS ARE ALREADY IN,AND IT WILL 
TELL YOU THE WEEK DAY FOR ANY FUTURE 
DATE IN LESS THAN A SECOND.PERFECT 
FOR BUSINESSMEN,STUDENTS,EUEN SCHOOL 
KIDS AND HOUSEWIUES WILL USE IT. 

YOU'LL ENJOY USINO IT EUERY DAY OF 
THE YEAR! NO PROGRAMING KNOWLEDGE 
REQUlRED.DOES REQUIRE AT LEAST 32K OF 
MEMORY AND 3.3 DISK DRIUE. 

******************* 

SEND CHECK OR MONEY ORDER FOR *24.95 TO: 
"CALENDAR" P.O.BOX 5701 FORESI PARK 
STATION,DAYTON,OHIO 45405 
ADD $1.00 FOR C.O.D.-U.P.S. 
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Apple Pascal* 
Users! 
Attention! 

Your programs cari now run 
2'h times faster with our New 

Speedup System! 

'trademark; Apple Computer 



The Lobero Building PO. Box 1 142 
Santa Barbara, Ca. 93120 
(805) 986-1140 Telex (>58439 


PRESERVE fcider 
WITH 
BINDERS & 

FILE CASES. 

Keep your issues of inCider handy and protected in 
handsome and durable library file boxes or binders. 
Both styles are bound in kelly green leatherette with 
thè magazine logo stamped in gold. 

File boxes: each file box holds 12 issues, with spines 
visible for easy referenr.c. 

$5.95 each, 3 for $17.00, 6 for $30.00 
Binders: each binder holds 12 issues and opens fiat 
for easy reading. 

$7.50 each, 3 for $21.75, 6 for $42.00 
(USA postage paid. Foreign orders must include 
$2.50 per item.) 

Please state years desired (1982 to 1984). 

Send check or money order to: 

Jesse Jones Box Corp., P.O. Box 5120, Philadelphia, 
PA 19141; please allow 6 to 8 weeks for delivery. 
Sorry, no C.O.D. or phone orders. 
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When you’re ready to listen 



We’re ready to talk. 


That used to be enough but it’s not anymore. 
Now, great software companies want sound 
effects too. They expect it. So we deliver it - 
on a single board. 

MOCKINGBOARD™ When you’re ready to 
listen, try sound and speech enhanced soft¬ 
ware by: Penguin Software, Datamost, 
Synergystic Software, Sierra On-Line, Sir- 
Tech Software, Gebelli Software, Hayden 


Software, AMI, Designware, Edu-Ware, 
Budgeco, M & R Enterprises, American 
Educational Software, Legend Industries, 
Earthware Computer Services, Sunnyside 
Soft, Lightning Software, G.Y.S.T., Vaga¬ 
bondo and a host of other fine producers. 



Sweet Micro Systems, 150 Chestnut Street, Providence, Rhode Island 02903 401-273-5333 
MOCKINGBOARD™ is Apple 11*, Apple II Plus* and Apple Ile* compatible. Hear one in action at your locai dealer. 

♦Apple is a registered trademark of Apple Computer Company. 
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Fudge It! 

by Don Fudge 


A renowned expert discusses thè union 
of audio and video effects on thè Apple. 

Sights and Sounds Together 


T his column is about graphics 
and sounds together. I’ve in- 
cluded several sound routines for you 
to key in and use. Hi-Res Secrets, and 
Action Sounds and Hi-Res Scrolling 
(from Avant-Garde), both contain 
lots more sound routines if thè need 
should arise. But just by examining 
thè enclosed machine language rou¬ 
tines you may leam enough about 
sounds to assemble some good ones of 
your own. It’s thè simplest type of 
machine language routine there is, 
except for thè delay routine. 

Let’s look for a second at what 
other popular computers have for 
graphics and sounds. The VIC-20 of- 
fers character graphics and can pro¬ 
duce three simultaneous notes (a 
chord) and sound effects with its 
sound generator. Almost any imagin- 
able sound effect is possible with thè 
noise generator. Poke statements ac- 
cess this hardware. 

The Atari 400 has sprite graphics 
they cali player/missile graphics 
(sprites are hi-resolution program- 
mable objects that can be moved by 
changing coordinates) and four in- 
dependent sound generators that use 
your TV’s speaker. There are 16 hi- 
res colors and 16 luminescence levels 
available in various combinations. Its 


100 GOSUB 61000: REM LORO TONE 
ROUTINE 

200 D « 140:P = 114: GOSUB 60000: 

P - 102: GOSUB 60000:P = 128 
: GOSUB 60000:P » 252: GOSUB 
60000:D = 255:P - 172: GOSUB 
60000: PRINT "LIST OUT THIS 
PROGRAM!": END 

60000 POKE 768,P: POKE 769,D: CALL 
770: RETURN 

61000 FOR I = 770 TO 790: READ D 
: POKE I,D: NEXT : RESTORE : 

RETURN 

61010 DATA 173,4B,192,136,208, 
5,206,1,3,240,9,202,208,245, 
174,0,3,76,2,3,96 


Listing 1. Tone routine. 


sound effects are great. 

The Commodore 64 has sprite 
graphics, collision detection, scaling 
up, and more. The sound generatore 
are excellent—they allow simultan¬ 
eous notes (chords), sound effects, 
imitation of musical instruments, 
and so on. POKEs access all sprites and 
sounds. Volume, waveform, control, 
attack/decay, sustain/release, and 
frequency are all POKE-controlled. 

With Apple and IBM, however, 
sounds are less dynamic since there is 
no reai sound-creation hardware out- 
side of “clicking thè speaker.” The 
IBM has sound interrupts, but with 
Apple you’ve got only location $C030 
(thè speaker address) to use. Sound 
becomes a matter of clicking Apple’s 
trusty speaker at various frequencies, 
frequency control depending on de¬ 
lay loops. 

Apple’s Speaker and Tone Routines 

You can access thè speaker by way 
of Basic or machine language. 
PEEK(-l6336), from Basic, yields a 


*302L 


0302- 

AD 30 

co 

LDA 

4C030 

0305- 

88 


DEY 


0306- 

DO 05 


BNE 

4030D 

0308- 

CE 01 

03 

DEC 

40301 

030B— 

FO 09 


BEQ 

40316 

030D- 

CA 


DEX 


03OE- 

DO F5 


BNE 

40305 

0310- 

AE 00 

03 

LDX 

40300 

0313- 

4C 02 

03 

JMP 

40302 

0316- 

60 


RTS 


0317- 

00 


BRK 


0318- 

00 


BRK 


031 S'¬ 

OO 


BRK 


OSI A- 

00 


BRK 


031B- 

00 


BRK 


031C- 

00 


BRK 


031D- 

00 


BRK 


031E- 

OO 


BRK 


031F- 

00 


BRK 


0320- 

00 


BRK 



Listing 2. Machine language Tone routine. 


click, and if you put p = PEEK(-16336) 
inside a For.. . Next loop, you get a 
buzz. For decent tones you need at 
least a tone routine to CALL. Find 
Listing 1 and key in thè Tone routine 
now. 

In line 100 you POKE in thè 
machine language tone generator 
via line 61000. In line 200 you 
use thè routine by specifying a dura- 
tion of 0-255 (as D) and a pitch 
of 0-255 (as P), and then GOSUB- 
ing to 60000 to POKE in your pitch 
and duration and run thè tone gen¬ 
erator with a Call 770. Do a call- 


Address correspondence to Don Fudge at 
Avant-Garde Creations, PO Box 30160, 
Eugene, OR 97403. 


«8B6.8E2 
0BB6- 20 BF 

O0BB- 08 20 BF 08 20 BF OB A9 

08C0- OO B5 FF A9 FF 83 FE A9 

08C8- OO BD 30 CO EE 30 CO CE 

08DO- 30 CO A6 FF CA DO FD C6 

08D8- FE FO 05 E6 FF 4C C7 08 

08E0- 60 
*8B6L 


QBB6- 

20 

BF 

08 

JSR 

408BF 

08B9- 

20 

BF 

08 

JSR 

408BF 

08BC- 

20 

BF 

08 

JSR 

408BF 

08BF- 

A9 

OO 


LDA 

*400 

08C1- 

85 

FF 


STA 

4FF 

08C3- 

A9 

FF 


LDA 

#4FF 

08C5- 

85 

FE 


STA 

4FE 

08C7- 

A9 

00 


LDA 

#400 

08C9- 

8D 

30 

CO 

STA 

4C030 

08CC- 

EE 

30 

CO 

INC 

4C030 

08CF- 

CE 

30 

CO 

DEC 

4C030 

08D2— 

A6 

FF 


LDX 

4FF 

08D4- 

CA 



DEX 


08D5- 

DO 

FD 


BNE 

408D4 

08D7- 

C6 

FE 


DEC 

4FE 

08D9- 

FO 

05 


BEQ 

408E0 

08DB- 

E6 

FF 


INC 

4FF 

O0DD- 

4C 

C7 

08 

JMP 

408C7 

08E0- 

60 



RTS 


08E1 — 

00 



BRK 



to BSAVE type: MULTIPLE LASER 
(C ALL2230), A2230, L44 


Listing 3. Multiple Laser. 
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IO 

HIMEMf 37473 

20 

POKE 232, ‘39: POKE 233,146 

30 

)* - CHR* 

(4): PRINT 04-BLOAD 


BOOM": PRINT D*“BLOAD EXPLO 


DE"» PRINT D*“BLOAD RNDl“ 

40 

HGR » ROT* 

O: SCALE- 1 

50 

HCOLOR- 3i 

HPLOT 0,99 TO 279, 


99 


60 

FOR O-IO 

TO 99» HCOLOR- 3» HPLOT 


Q,0 TO 0 

- 8,0 - 8 TO Q - 6, 


Q - IO 


70 

» - PEEK ( 

- 16336) + PEEK ( 1 


- 16336) 

- PEEK < - 16336) 

eo 

HCOLOR- Ot 

HPLOT Q,0 TO 0-8 


,D - 8 TO 

Q - 6,0 - lOi NEXT 

110 

FOR A * 1 

TO 5: XDRAW A AT Q 


,Qs FOR W 

- 1 TO 20» NEXT : XDRAW 


A AT 0,0 


120 

IF A - 1 

THEN CALL 2048 

130 

NEXT 



Listing 4. Demo. 


151 and 302L <retum> to see thè tone 
generator disassembly. Notice that 
thè pitch and duration, POKEd into 
768 ($300) and 769 ($301), control 
thè looping and delaying. See Listing 
2 and Tables la-c. 

But these tones take thè full atten- 
tion of thè 6502 (Apple’s CPU). You 
can’t really have graphics action dur- 
ing a tone. Or can you? Well, not if 
you build it as in Listing 2. However, 
if you use thè graphics commands in 


place of do-nothing delay loops in 
sound routines, thè deed can, in ef- 
fect, be accomplished. Of course, thè 
game must be in machine language 
so STA $C030 commands happen 
60-10,000 times a seeond. Simultan- 
eous tones and action are then a per- 
ceived reality. To thè computer it’s 
click-move shape-click-move shape- 
and so on. But to your ears and eyes 
it’s all happening at once. 

Sound Routines 

At thè conclusion of this column 
you’ll find thè sound routines Explo- 
sion (Listing 9), Helicopter (Listing 
10), and Dive Strafing (Listing 11). 
Another sound routine. Multiple La¬ 
ser, appears in Listing 3. BSAVE infor- 
mation accompanies thè listings. Do 
a CALL-151 before keying them in. 
There’s also an explosion shape table 
called Boom, with five vector shapes 
in it (Table 2). 

Unless thè Basic program you run 


is quite short, you might like to 
POKE103,1:POKE104,64:POKE16384,0 in 
your boot program and run it before 
running your sound-using program. 
This prevents sound routines from 
clashing with program memory by 
starting your Applesoft program at 
$4000. 

Multiple Laser 

Now key in MULTIPLE LASER(CALL 
2230) (Listing 3) and do a CALL 2230 in 
immediate mode in Basic. Now try a 
CALL 2239. The sound just went from 
four laser blasts to one laser blast. 
Let’s see why. Type CALL-151 and do 
an 8B6L <retum>. The 2230 is decimai 
equivalent to hex 8B5, while 2239 
equals $8BF. From $8B6 to $8BE is 
simply GOSUBing (via JSR) thè single 
laser sound at $8BF, which returns 
(RTS) at $8E0. So three GOSUBs and 
one CALL are essentially what this 
Multiple Laser routine contains. 
CALL-151 and 8B6G or 8BFG are ways 
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LOCK-IT-UP 

DISKETTE COPY-PROTECTION 
AND DUPLICATION SYSTEMS 
FOR THE APPLE COMPUTER 

The Lock-lt-Up systems are aophisticated, menu driven 
copy-protection and dupllcatlon Utilities for thè Apple II 
Computer. They testure severaI levels of protection which 
make standard diskettes uncopyable by even thè most 
sophisticated nibbio copy program» currently avallable. 

• All sectors on thè diskette can stili be used. 

• Data f iles can be loaded and/or saved to either thè protected diskette 
or an unprotected diskette. 

• Memory will be cleared and thè disk will reboot if thè reset key is 
pushed. 

• The copying systems support up to 14 disk drives. 

• Complete data-verification is optional during copy. 

• Sequential serial numbers are asslgnedtoeach diskette producedby 
thè System 

• Master diskettes created with thè System contain an I.D. stamp that 
you select. The I.D. stamp must be correctly specified before any 
diskettes can be duplicated. This prevents other Lock-lt-Up owners 
from copying your diskettes. 

• Extensive support is provided should you have any problems or 
special needs. 

• Our System is supported by numerous disk copying Services should 
you need a large quantity of diskettes duplicated. 

Either System is available for $225, which includes three diskettes, an 

informative manual, and a non-exclusive license to copy as many 

diskettes as needed. 

ORDER NOW! Cali collect for COD, MasterCard or Visa orders 

DEALER INQUIRIES INVITED 



DOS VERSION: 

• Any standard DOS 3.3 diskette can be protected. 

• DOS command names can be changed and/or deleted. 

• Autorun can be used to preventthe listing of a program or thè use of 
any basic commands outside of a program. 

• A faster DOS can be used in order to decrease disk access time by up 
to 50%ì 

REQUIRES: 48K Apple II or 11+ with Applesoft in ROM or language 
System and at least two disk drives. 

PASCAL VERSION: 

• Any standard Apple Pascal 1.1 diskette can be protected. 

• Files may be transferred to a standard Pascal diskette, but they will 
not run unless they are on thè protected diskette. 

• Easily added to any program by use of a Regular Unit. 

• Compatible with Apple Fortran. 

REQUIRES: Apple Pascal and at least two disk drives. 



DOUBLÉ - GOLD 

SOFTWARE 


13126 ANZA DRIVE 
SARATOGA, CA 95070 
(408) 257-2247 
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to CALL 2230 and 2239 from thè 
monitor. 

Now, let’s check out thè program’s 
construction. LDA means load thè ac- 
cumulator from either memory or 
from an immediate specified value (§ 
means immediate value follows). STA 
means store thè accumulator in thè 
address gìven. INC means increment 
(add one to) thè following memory 
location. DEC means decrement (sub- 
tract one from) thè following mem¬ 
ory location. DEX means decrement 
thè X register, which is used as a 
counter here. LDX means load thè X 
register from thè memory location 
given. (No immediate mode LDX is 
given here, but that’s valid also.) 

BNE means branch to thè given 
location if thè last operation pro- 
duced results not equal to zero. BEQ 
means branch to thè given location if 
thè last operation produced a zero 
result. JMP means jump to thè given 
location. RTS is like Basic’s 
RETURN —if you run a routine with a 


pened prior to thè RTS, you’ll be sent 
back to thè command following thè 
JSR when you hit thè RTS. (I use LISA 
2.5G for assembling and recommend 
it highly.) 

Notice that from $8D2 to $8D5 is a 
delay loop. The BNE keeps sending us 


"This yields a sound 
that goes from high to 
low, because thè frequency 
of clicking thè speaker 
goes down as thè 
delays increase." 


up to $8D4 until thè DEX we do there 
results in zero. This delay loop gets 


larger due to $8DB INC $FF. This yields 
a sound that goes from high to low, 
because thè frequency of clicking thè 
speaker ($C030) goes down as thè 
delays increase. The 255($FF) put into 
$FE is thè routine length variable. A 
number like $7F (127) would make 
thè laser much faster. Try it and see: 

8C4:7F <return> 

8B6G <returri> 

A Piane Crash Demo 

Now let’s get sound and action 
together. Check out thè Demo listing 
(Listing 4). It produces a simple 
representation of an airplane 
crashing. The piane is hplotted in 
white and erased (prior to updating 
its X and Y coordinates and redraw- 
ing it) by hplotting in black. 

The Boom file (Table 2) is five in- 
creasingly larger explosion vector 
shapes that can be drawn or re- 
drawn. Line 110 of Demo displays all 


monitor G command, RTS sends you 
back to thè monitor. If a JSR hap- 


more and more time consuming, be¬ 
cause thè value in $FF keeps getting 


*9263.9353 


9263- 

05 

00 

OC 

00 

1E 




9268- 

00 

39 

00 

62 

00 

Al 

00 

40 

9270- 

61 

1C 

3F 

3F 

17 

97 

36 

8D 

927B- 

15 

17 

OD 

2D 

OC 

64 

24 

04 

9280— 

00 

9B 

92 

6E 

92 

05 

60 

4C 

9288— 

64 

60 

E1 

C4 

08 

18 

OC 

1C 

9290- 

DC 

9F 

17 

DF 

97 

97 

92 

BA 

9298- 

6E 

12 

06 

00 

DB 

DB 

93 

DE 

92A0- 

DB 

12 

BD 

69 

49 

09 

D6 

DF 

92A8- 

12 

4D 

89 

6A 

68 

61 

40 

E1 

92B0- 

44 

61 

40 

40 

C4 

18 

44 

40 

92BB- 

EO 

E3 

FB 

E3 

1B 

96 

E3 

BD 

92CO- 

1B 

97 

92 

06 

00 

CO 

40 

CO 

92C8- 

68 

40 

40 

69 

49 

4C 

61 

09 

92D0- 

96 

92 

92 

52 

09 

96 

92 

FB 

92D8- 

9B 

92 

DF 

93 

95 

97 

92 

DA 

92E0- 

DF 

DC 

FB 

CO 

CO 

18 

96 

92 

92E8— 

FB 

1B 

C7 

CO 

CO 

E3 

CO 

CO 

92F0- 

CO 

40 

45 

48 

08 

44 

08 

18 

92F8— 

44 

CO 

CO 

40 

4C 

48 

48 

48 

9300- 

48 

48 

05 

00 

CO 

CO 

CO 

40 

9308— 

CO 

40 

18 

DC 

C3 

DB 

D8 

1B 

9310- 

96 

92 

92 

1B 

96 

92 

1A 

DF 

9318- 

92 

12 

96 

92 

92 

6A 

49 

89 

9320- 

92 

6A 

40 

40 

40 

48 

B1 

92 

9328- 

92 

6A 

49 

49 

41 

48 

56 

49 

9330- 

44 

40 

40 

4E 

09 

44 

40 

EO 

9338- 

CO 

40 

40 

40 

63 

40 

40 

40 

9340- 

C4 

CO 

CO 

CO 

CO 

DB 

DE 

63 

9348- 

40 

48 

09 

F8 

DB 

DB 

DB 

E3 

9350- 

CO 

DB 

3B 

OO 






* 


to BSAVE type: BOOM,A37475, 
L243 (use HIMEM:37475) 

Table 2. Boom. 


Pitch(P) 

G = 255 

G’= 128 

G’ = 64 

G’” = 31 

G”” = 15 

£ 

il 

£ 

03 

Ab = 121 

Ab” = 60 

Ab” = 26 

Ab”” =14 

A = 231 

A’= 114 

A” = 56 

A’” = 28 

A’”’ = 13* 

Bb = 217 

Bb’ = 108 

Bb” = 53 

Bb’” = 26 

Bb”” = 12 

B = 203 

B’ = 102 

B” = 50 

B’” =25* 


C = 192 

C’ = 96 

C” = 47 

C”’ = 23 


C# = 182 

Cf = 90 

C#’ = 45 

Cf" = 22 


D = 172 

D’ = 85 

D” = 42 

D”' = 21 


Eb = 162 

Eb’ = 80 

Eb” = 40 

Eb’” = 20* 


E = 154 

E’= 76 

E” = 37 

E’” = 18 

E”” = 11 

F = 146 

F = 72 

F’ = 35 

F” = 17 

F”” = 10 

OO 

II 

?*= 

Uh 

F#’ = 67 

F#”=33 

CD 

II 

=*= 

Uh 

Ff = 9 

i Duratìon(D) 

Table la. Pitch 

Rests(R) 

The formula for a whole rest is: 

Line § FOR R = 1 TO 500:NEXT R 

Wliole noie = 240 

Half note = 120 
quarter note — 60 

Eight note = 30 

Sixteenth note = 15 

Thirty-Second note = 8 

Sixty-Fourth note = 4 

One hundred and twenty-eighth note 

= 2 

Whole rest = 500 

Half rest = 250 

Quarter Rest = 125 
Eighth rest = 62 

16th rest = 31 

32nd rest = 16 

64th rest = 8 

128th rest = 4 


Table lb. Duration 


Table le. Resti 



160 èider May 1983 







Fudge It! 


these vector shapes (with a slight 
delay in thè drawn mode) sequential- 
ly. Explode (Listing 5) is a sound 
routine at 2048 and Rndl (Listing 6) 
is a random number generator at 
$890 called by Explode in 0815. 

The BSAVE information for Ex¬ 
plode is A2048,L45. For Rndl it’s 
A2192,L64. HIMEM is set to 37475 
since that’s where Boom BLOADs, and 
program strings from Demo would 
overwrite part of Boom if we didn’t 
protect it in this way. Also, locations 
■232 and 233 must always contain low 
and high bytes of thè shape table 
(Boom) starting address, if you’re go- 
ing to use Applesoft shapes. In line 20 
convert 37475 into those two num- 
bers, specifically 99 and 146, by thè 
following: 

NEW <retum> 

?PEEK(104) <retum> 

37475A <retum> 

CALL-151 <retum> 

4003.4004 <retum> 

Use thè 4003.4004 if ?PEEK(104) got a 
result of 64. If it got 8, then use 803.804. 
You’ll see either 4003-63 92 or 803-63 92, 
depending on thè PEEK(104) result. (I 


0800— AO 7F 84 09 CO 09 EA F0 
0808- 23 A9 08 85 FF C6 FF F0 
0810- 1B A5 FF 85 06 20 90 08 
0818- A9 00 EE 30 CO EE 30 CO 
0820- CE 30 CO Cò 08 FO 02 DO 
0828- EF 4C 04 08 60 


85 FF 
Cò FF 
FO 1B 
A5 FF 
85 06 
20 90 08 
A 9 00 
EE 30 CO 
EE 30 CO 
CE 30 CO 
C6 OB 
FO 02 
DO EF 
4C 04 OB 


0B2C- 60 


again recommend POKE103,liPOKE 
104,64:POKE 16384,0 in thè Hello pro¬ 
gram that runs before Demo). The 
63 92 means $9263 is thè hex ad¬ 
dress that 37475 is equivalent to. 
Converdng thè low byte ($63) to 
decimai yields 99 since 6 x 16 + 3 = 
99 and converting thè high byte ($92) 
to decimai yields 9 X 16 + 2 = 146. 

After keying in Boom (Table 2), 
Explode (Listing 5) and Rndl (List¬ 
ing 6), key in and run Demo (Listing 
4) and notiee how it works. The 
piane seems to dive slowly to earth 
and crash. You can stili teli that thè 
engine noises happen between shape 
movements; and theexplosionsounds 
happen quite apart from thè blow-up 
shape displays, if you’re observing 
carefully. Yet this type of sound/ac- 
tion sequence is not all that uncom- 
mon. What are in truth separate 
sound and action events pass, for all 
practical purposes, as simultaneous 
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sound and action. 

Machine Language to thè Rescue 
What would a program look like 
that produced absolutely indistin- 
guishable sound/action sequences? 
Well, first of all it would be in 
machine language. It might use extra 
hardware peripherals, like thè music 
peripheral cards that give simultan- 
eous notes on-screen and musical 
chords through speakers. One sound/ 
action sequence that comes immedi- 
ately to mind is thè laser-quarks in 
Death Race ’82, my second machine 
language arcade game. See Listing 7. 

l’ve included these assembly in- 
structions from Death Race ’82’s 
source codes so you can see how I in- 
terwove sound-creation instructions 
with laser-quark movement algo- 
rithms. We’ll ignore lines 1-10 and 
15-27, which deal with action. Lines 
11-14 create thè neat little homet- 


Listing 5. Explode 


INTRA'S PSIO Closcs 
THE CAP BETWEEN 
ASCII & BAUDOT 



101 W. 31 st Street 
New York, N.Y. 10001 
(212) 947-5533 

•TRADEMARK APPLE COMPUTER. INC 
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like buzz thè laser-quarks make as 
they zip across thè hi-res screen. 
Notice that I stick $FF into Y, thè 
temporary counter, and decrement Y 
until it reaches 0, all thè while click- 
ing thè speaker once per loop. Once 
line 14 (BNE) finds a 0 in thè Y 
register, thè program condnues on. 
The effect is totally convincing. The 
laser-quarks appear to be making thè 
sound you hear as they zip across thè 
screen. The idea that thè speaker 
clicks and action sequences are actu- 
ally separate will never enter your 
head—it all happens too fast. 

Another example is thè void- 
boundary dots in Zero Gravity Pin¬ 


890. 

O 

Q 

CD 



0090- 

AE E1 08 E8 

BC 00 

DO 84 

0898— 

4E ES BC 00 

DO 84 

4F SE 

08A0- 

ei oa A 2 oa 

18 A5 

4E 2A 

08A8- 

2A 2A 2A 29 

01 85 

07 A5 

08B0- 

4F 29 01 18 

45 07 

FO 01 

08B8- 

38 26 4F 26 

4E CA 

DO E4 

08C0- 

A5 4F 38 E5 

06 90 

03 4C 

08C8- 

C2 08 18 65 

06 85 

08 60 

890L 

0890- 

AE E1 oa 

LDX 

♦0BE1 

0893- 

ES 

INX 


0894- 

BC 00 DO 

LDY 

♦DOGO,X 

0897- 

84 4E 

STY 

*4E 

0899- 

E8 

INX 


0B9A- 

BC 00 DO 

LDY 

♦DOGO,X 

0S9D- 

04 4F 

STY 

*4F 

089F- 

SE Et 08 

STX 

*08E1 

OBA2- 

A2 08 

LDX 

#*08 

08A4- 

18 

CLC 


08A5- 

A5 4E 

LDA 

*4E 

08A7- 

2A 

ROL 


0BA8- 

2A 

ROL 


O0A9- 

2A 

ROL 


08AA- 

2A 

ROL 


OBAB- 

29 01 

AND 

#*01 

08AD- 

85 07 

STA 

*07 

08 AF- 

A5 4F 

LDA 

*4F 

08B1- 

29 01 

AND 

#*01 

08B3- 

18 

CLC 


08B4- 

45 07 

EOR 

*07 

08B6- 

FO 01 

BEQ 

*08 B9 

08B8- 

38 

SEC 


08B9- 

26 4F 

ROL 

*4F 

08BB- 

26 4E 

ROL 

*4E 

O0BD- 

CA 

DEX 


08BE- 

DO E4 

BNE 

*0BA4 

OSCO- 

A5 4F 

LDA 

*4F 

08C2- 

38 

SEC 


08C3- 

E5 06 

SBC 

*06 

08C5- 

90 03 

BCC 

*08CA 

08C7- 

40 02 08 

JMP 

*08C2 

OSCA- 

18 

CLC 


08CB- 

65 06 

ADC 

*06 

08CD- 

85 08 

STA 

*0B 

08CF- 

60 

RTS 


08D0- 

20 58 FC 

JSR 

♦FC58 

08D3- 

A9 02 

LDA 

#*C2 | 

08D5- 

20 ED FD 

JSR 

*FDED 

08D8- 

A9 01 

LDA 

#*01 ! 

■ 

Listing 6. Rudi. 



ball, my first arcade game. The 
redrawing of void-boundary dots is 
periodically enhanced by sound ef- 
fects. In Listing 8, Dotsl, you’ll find 
a disassembly rather than assembly 
so uree codes. Sometimes an algo- 
rithm is so simple to write I don’t 
even bother to save thè source. I just 
BSAVE thè machine language routine 
once assembled, knowing that I can 
rewrite thè assembly code in a few 
minutes by checldng out thè disassem¬ 
bly. You’ll see what I mean shortly. 

Dotsl hplots dots, spaced four 
coordinates apart, with accompany- 
ing sound effeets. I could have drawn 
all thè dots involved in a tiny fraction 


'The idea that thè speaker 
clicks and action sequences 
are actually separate will 
never enter your mind— 
it all happens too fast." 


of a second without sound effeets or 
delays, but thè result would have 
been less interesting. The disassembly 
alone will enable you to key Dotsl in 
and test it. 10HGR:POKE-16302,0:H- 
COLOR = 3:CALL32768 is all that’s 
needed to RUN it. 

To delete sounds do an 8074:60. And 
8001 :A0 produces a variation on thè 
sound effect. All that’s really happen¬ 
ing here is hplotting and speaker 
clicking. The JSR $807l’s take thè pro¬ 
gram to thè hplot/sound routine at 
$8071 where JSR $F457 (thè Applesoft 
Hplot routine) plots thè point having 
coordinates stored in thè registers 
(horizontal low in X, horizontal high 
in Y, and vertical in thè accumula- 
tor). So, INC $FF four tìmes and then 
LDA $FF means that vertical coor¬ 
dinate data is being quadra-incre- 
mented before being used for plot- 
ting again. 

In thè $8071 subroutine, thè speak¬ 
er clicks an increasing number of 


! L 1 

SEC 

n 

A. 

SBC #*5 

3 

CMP YZ 

4 

BCS LS8 

5 

CLC 

6 

ADC #! 10 

7 

CMP YZ 

8 

BCC L88 

9 

BCS L90 

10 QUIT 

RTS 

11 L88 

LDY #*FF 

12 DDDD 

STA *C030 

13 

DEY 

14 

BNE DDDD 

15 

LDX XZ 

16 

LDY #»0 

17 

LDA YZ 

18 

JSR HPQSN 

19 

LDX #*D5 

20 

LDY #*9 

21 

LDA *F9 

22 

JSR XDRAW 

23 

INC *EB 

24 

LDA *EB 

25 

CMP U 

26 

BCS QUIT 

27 

JMP MOVBUL 

Listing 7. Death Race '82. 


times as thè action progresses. The INC 
$07 sees that each use of thè subroutine 
increments thè loop counter ($7) and 
BNE $8078 makes sure you keep looping 
though thè speaker-clicker lines until 
thè temporary loop counter ($6) is 
decremented to 0. 

The Dotsl routine also includes 
looping for hplot purposes, such as 
8036-8038 CMP (compare) and BCC 
(branch if less than), which loops 
back to $8008, and thè 806C-806E CMP 
and BCC, which loops back to $803E. 
See how a quick explanation can turn 
a bunch of meaningless codes into 
simple routines? 

Zero Gravity Pinball 

Other algorithms simulating sound 
caused by on-screen action are thè 
bumper and spinner hitting routines 
in Zero Gravity Pinball. When 
bumpers are hit by thè ball, they 
light up and/or change color and 
then I CALL (with a JSR usually) a 
sound routine so thè ball appears to 
have caused thè game’s “electronic 
switches” to light up thè bumper and 
create thè sound. What really hap¬ 
pens is that I check thè collision 
counter for a collision of thè ball with 
any on-screen object, find a collision 
and so jump to thè collision 
subroutine. This determines where 
on thè screen thè ball is, so thè pro¬ 
gram can determine which object 
was hit. (Four spinners, four buzzers, 
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four bumpers, four corner-bumpers, 
one black hole, two force fields, ten 
flippers, and four voids are all possi- 


8000- 

A9 

28 


LDA 

#S2B 

8002- 

85 

07 


STA 

*07 

8004- 

A2 

66 


LDX 

#«66 

8006- 

86 

FF 


STX 

*FF 

8008- 

AO 

00 


LDY 

#*00 

800A- 

A6 

FF 


LDX 

*FF 

800C- 

A9 

04 


LDA 

#*04 

800E- 

20 

71 

80 

JSR 

*8071 

8011- 

AO 

00 


LDY 

#*00 

8013- 

A6 

FF 


LDX 

*FF 

8015- 

A9 

00 


LDA 

#*00 

8017- 

20 

71 

80 

JSR 

*8071 

801A- 

AO 

00 


LDY 

#*00 

801C— 

A6 

FF 


LDX 

*FF 

801E- 

A9 

BF 


LDA 

#*BF 

8020- 

20 

71 

80 

JSR 

*8071 

8023- 

AO 

00 


LDY 

#*00 

8025- 

A6 

FF 


LDX 

*FF 

8027- 

A9 

BB 


LDA 

#«BB 

8029- 

20 

71 

80 

JSR 

*8071 

*L 






802C- 

E6 

FF 


INC 

*FF 

802E- 

E6 

FF 


INC 

*FF 

8030- 

E6 

FF 


INC 

*FF 

8032- 

E6 

FF 


INC 

*FF 

8034- 

A5 

FF 


LDA 

*FF 

8036- 

C9 

B3 


CMP 

#*B3 

8038- 

90 

CE 


BCC 

*8008 

B03A- 

A9 

14 


LDA 

#*14 

B03C- 

85 

FF 

K 

STA 

♦FF 

0Q3E- 

AO 

00 

r 

A 

LDY 

#*00 

8040- 

A2 

02 


LDX 

#*02 

0042- 

A5 

FF 


LDA 

*FF 

8044- 

20 

71 

80 

JSR 

*8071 

8047- 

AO 

00 


LDY 

#*00 

8049- 

A2 

00 


LDX 

#*00 

B04B- 

A5 

FF 


LDA 

*FF 

804D- 

20 

71 

80 

JSR 

*8071 

8050- 

AO 

01 


LDY 

#*01 

8052- 

A2 

14 


LDX 

#*14 

8054- 

A5 

FF 


LDA 

*FF 

*L 






8056- 

20 

71 

80 

JSR 

*8071 

8059- 

AO 

01 


LDY 

#*01 

805B- 

A2 

16 


LDX 

#*16 

805D- 

A5 

FF 


LDA 

*FF 

805F- 

20 

71 

80 

JSR 

*0071 

8062- 

E6 

FF 


INC 

*FF 

8064- 

E6 

FF 


INC 

*FF 

8066- 

E6 

FF 


INC 

*F.F 

8068- 

E6 

FF 


INC 

*FF 

806A- 

A5 

FF 


LDA 

*FF 

806C- 

C9 

AB 


CMP 

#*AB 

806E- 

90 

CE 


BCC 

*803E 

8070- 

60 



RTS 


8071- 

20 

57 

F4 

JSR 

*F457 

8074- 

A5 

07 


LDA 

*07 

8076- 

85 

06 


STA 

*06 

8078- 

A9 

00 


LDA 

#*00 

B07A- 

8D 

30 

CO 

STA 

*C030 

807D- 

EE 

30 

CO 

INC 

*C030 

8080- 

CE 

30 

CO 

DEC 

*C030 

*L 






8083- 

C6 

06 


DEC 

*06 

8085- 

A5 

06 


LDA 

*06 

8087- 

DO 

EF 


BNE 

*8070 

8089- 

E6 

07 


INC 

*07 

808B- 

60 



RTS 



Listing 8. Dotsl. 


ble collision sources.) Appropriate 
action can then be taken, including 
thè introduction of randomness. 

Bumpers and buzzers merely light 
up and make noise. Spinners, on thè 
other hand, need to simulate rota- 
tion, accompanied by noises that 
enhance thè effect. The spinner must 
be drawn and erased at various 
points in thè rotation until motion is 
perceived by thè player. Appropriate 
sounds are interwoven into thè 
animation sequence. 

Balls that hit thè “void” disinte¬ 
grate immediately with an explosion 
routine not unlike thè one in Demo. 
(Even though space has no noise in it 
because it’s a vacuum, if Star Wars 
and Battlestar Galactica and Buck 
Rogers can have space sound, then so 
can Zero Gravity Pinball!) Again, thè 
use of machine language is criticai in 
achieving effective sound/action si- 
multaneity. 


Speech Synthesis 

You may have noticed thè spoken 
words in Intellivision’s newest games. 
This addition to usuai game sound ef- 
fects can enhance thè realism of thè 
game and create extra excitement 
and intrigue. 

Apples can also generate spoken 
words. Appletalker, an old Bob 
Bishop cassette from Softape, has you 
talk to your Apple via thè cassette in¬ 
put port. It digitizes thè sounds and 
saves thè resultant data in Ap¬ 
pletalker tables. These could be 
played back and even stored on tapes 
or disks, to be used in your own pro- 
grams. Thereis, however, oneserious 
drawback (apart from thè fact that 
thè sound quality is low). Each word 
takes up an enormous amount of 
memory. 

Programs often act like water— 
they conform to thè shape of their 
container. If you have a 16K Atari, 
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*1560. 

15 

2|B 







1560- 

A9 

07 

85 

06 

AO 

00 

A9 

09 

1568- 

85 

FE 

A9 

00 

8D 

30 

CO 

EE 

1570- 

30 

co 

CE 

30 

CO 

A2 

FF 

CA 

1578- 

DO 

FD 

A2 

FF 

CA 

DO 

FD 

A2 

1580- 

FF 

CA 

DO 

FD 

B6 

21 

CS 

CA 

1588- 

DO 

FD 

B6 

21 

CA 

DO 

FD 

B6 

1590- 

21 

CA 

DO 

FD 

B6 

21 

CA 

DO 

1598“ 

FD 

C6 

FE 

FO 

03 

4C 

6A 

15 

15A0- 

A9 

45 

20 

A8 

FC 

C6 

06 

DO 

15AB- 

BD 

60 







to BSAVE type: 

EXPLOSION 



(CALLS472) ,A5472,L75 







Listing 9. 

Explosion. 




you’ll have a lot of 14-15K programs. 
If you have a 48K Apple, you’ll use 
most of that RAM space. Memory al- 
ways seems to be at a premium— 
hence 16K, 64K, and 128K RAM 
cards, hard disks drives, and so on, 

How many games have room for 
1000-byte words or 4000-byte phrases? 
Not many, There was a CALL- 

A. P.P.L.E. article entitled “Apple 
Free Speech” in September of 1981 
that included a Maxtalk program by 

B. C. Detterick. He stated that ex- 
tending thè sample time would en- 
able a whole word to fit into 512-768 
bytes (two to three pages) of mem- 
ory. By sample, he meant a sample of 
thè audio coming in through your 
Apple’s cassette input port, by way of 
a microphone. As thè length of thè 
sample to be digitized increàses, thè 
sound quality decreases. The two-to- 
three-page words above stretch thè 
limits of this scheme; clearer words 
take a lot more memory. 

Fortunately, speech synthesizer 
chips have made massive memory 
usage an obsolete methodology for 
speech synthesis. Texas Instruments 
has not only made good RAM and 
ROM chips, but also good sound gen¬ 
eration, video display processor, and 
speech synthesizer chips. As a result, 
thè Echo II (a peripheral card with 
speech synthesizer), for instance, 
need only be plugged into a periph¬ 
eral slot, a couple of magic com- 
mands given, and words typed or 
strings read are spoken. I’ve tried thè 
Echo II—it’s quite impressive, except 
for thè Gs sounding too much like Bs 
(or was it vice versa?). 

Needless to say, this approach, 
rather than memory-hogging digiti- 
zation, is thè key to future computer 
speech. In goes a string, out Comes a 
pronounced word. This method is 
more than a idea; speech synthesizers 


are already used in toys, exhibits, and 
devices to help speechless people 
“talk” and retarded people learn. 

Is Compiling thè Answer? 

In a game called Lazer Maze by 
Jim Spain, lines (lazers—24th cen- 
tury spelling) are drawn between 
reflection baffles after a combatant 
has fired his lazer into a mirror maze. 
You try to guess where thè lazer beam 
will come out, which is also where 
thè alien combatant will be waiting. 
A special eerie space sound starts each 
turn, and after thè lazer beam is fired 
an appropriate sound is heard every 
time a beam bounces off a reflective 
baffle. Ultimately, either thè alien is 
hit, with accompanying explosion, or 
thè alien heaves a throwing bomb 
that blows you up. 

Both explosion sound effects in¬ 
cluded in this column are used in this 
game. The lazer sound (CALL2239 
after BLOADing MULTIPLE LASER 
(CALL2230)) also appears in this col¬ 
umn. Feel free to use any of my sound 
effects in your own games. Just CALL 
them from Basic at thè CALL number 
given, or JSR to them from machine 
language. 

This lazer beam drawing with thè 
lazer sound routine works reasonably 
well in Basic, but compiling it (into 
Lazer Maze) makes it work very well 
indeed. The lines draw faster and thè 
calculation routines execute faster. 
We used a Speedstar compiler from 
South western Data Systems (S.D.S.). 

But thè sound effects don’t change 
with compiling at all, except for thè 
throwing bomb. You see, a compiler 


*15AC.15F8 







15AC- AO 

23 

20 

B4 





15BÙ- 15 

88 

DO 

FA 

A9 

01 

85 

FF 

15B8- A9 

45 

85 

FE 

A9 

00 

8D 

30 

15C0- CO 

EE 

30 

CO 

CE 

30 

CO 

A6 

15C8- FF 

CA 

DO 

FD 

C6 

FE 

FO 

05 

15D0- E6 

FF 

4C 

BC 

15 

A9 

12 

85 

15D8- 08 

A9 

20 

85 

06 

A9 

03 

85 

15E0- 07 

8D 

30 

CO 

EE 

30 

CO 

CE 

15E8“ 30 

CO 

C6 

06 

DO 

02 

C6 

07 

15F0- DO 
15F8- 

F8 

C6 

08 

DO 

E3 

60 


to BSAVE type: HELICOPTER 



(CALL5548),A5548,L76 





Listing 10. Helicopter. 




speeds up programs by circumvent- 
ing thè Applesoft Interpreter. Once 
compiled, thè program merely jumps 
around from One machine language 
routine to another. But thè lazer 
sound in Lazer Maze already was in 
machine language, so there was no 
way (and no need) to speed it up. 
Compiling just changed CALL to JSR, 
in effect. 

The reason thè bomb-throwing 
sounds speeded up is that this routine 
was in Basic, structured so that as thè 
bomb moved across thè screen thè 
speaker would click. When thè bomb 
moved two to three times as fast due 
to compiling, thè delays between 
clicks became two to three times as 
short, transforming thè clicking into 
a buzzing. There are many types of 
sound effects created in Basic that 
could be improved by compiling. 

Hi-Res Secrets’ Sounds 

Another way to improve thè qiiali- 
ty of sound effects is by using thè 
Ampersand (&) corrim and from Ap¬ 
plesoft Basic. Hi-Res Secrets provides 
an example of this, as well as many 
tone, sound and noise routines. There 
are even a violin sound producer and 
a music program that turns thè Ap¬ 
ple’s keyboard into a “piano.” 

The key (no pun intended) to thè 
latter is in interpreting which key is 
being pressed by examining thè char- 


*14D6. 155F 


14D6- 

14D8- 

A9 

85 

FF 

07 

A9 

FF 

85 

09 

A9 

80 

14E0- 

85 

FE 

A9 

00 

8D 

30 

CO 

EE 

14E8- 

30 

CO 

CE 

30 

CO 

AO 

03 

A6 

14F0- 

09 

CA 

DO 

FD 

A2 

64 

CA 

DO 

14F8- 

FD 

88 

FO 

03 

4C 

EF 

14 

E6 

1500— 

09 

A9 

00 

8D 

30 

CO 

EE 

30 

1508- 

CO 

CE 

30 

CO 

AO 

03 

A6 

07 

1510- 

CA 

DO 

FD 

A2 

64 

CA 

DO 

FD 

1518- 

88 

FO 

03 

4C 

OE 

15 

C6 

FE 

1520- 

FO 

05 

E6 

09 

4C 

E2 

14 

20 

1528- 

3C 

15 

20 

3C 

15 

20 

3C 

15 

1530- 

20 

3C 

15 

20 

3C 

15 

20 

3C 

1538- 

15 

20 

3C 

15 

A9 

FF 

85 

FF 

1540- 

A9 

9B 

85 

FE 

A9 

00 

SD 

30 

1548- 

CO 

EE 

30 

CO 

CE 

30 

CO 

A6 

1550- 

FF 

CA 

DO 

FD 

C6 

FE 

FO 

05 

1558- 

E6 

FF 

4C 

44 

15 

60 




to BSAVE type: DIVE STRAFING 
(CALL5334),A5334,L137 

Listini’ 11. Dive Strafing. 
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acter you just got with thè Get com- 
mand, then looking at thè relative 
position of thè key on thè keyboard 
and assigning a frequency value ac- 
cording to thè tone forthcoming. I set 
C at 192, D at 172, and E at 154, for 
example. (See Tables la-c for more 
pitch, duration, and rest values.) 
Four and a half octaves were possi- 
ble. By adjusting thè machine lan- 
guage tone generating routine in 
Listing 2, longer, higher and lower 
tones are possible. 

Since such keys as thè comma and 
semicolon are among those used as 
note keys, saving thè composed tunes 
as string array textfiles can’t be easily 
accomplished. So, I convert to ASCII 
numbers first. To reduce space re- 
quirements, I could have, with a bit 
more work, BSAVEd binary files full 
of thè hex equivalents of these 
ASCIIs. 

An OverView 

FU dose with an overview of 
future graphics and sounds pòten- 
tials. The Commodore 64 introduc- 
tion of standard 64K, thè VDP (video 
display processor) chip, and sound ef- 
fects hardware, all for under $600, is 
certainly a token of things to come—a 
token to be taken seriously. Soon all 
micros will be expected to have sprite 
graphics (which thè VDP provides) 
and dynamic sound effect hardware 
as standard equipment. The fact that 
Apple and IBM lag behind in these 
two respects is, I believe, only a tem- 
porary result of their trying to appear 
sophisticated and business-like to thè 
business market. But thè IBM is 
already thè business computer 
amongst thè larger-sized machines, 
and thousands of companies have al¬ 
ready found that thè Apple can be a 
serious business computer if applied 
correctly to thè task and supplied 
with appropriate software. 

IBM and Apple seem to have 
serious reservations about being 
stale-of-the-art graphics and sound 
machines. I can only conclude that 
they’re equating sound and graphics 
with arcade games, and feel that area 
is for Atari, Intellivision, Coleco, and 
perhaps thè Commodore 64. 

This is a serious, error. I can 


already see some Apple owners look¬ 
ing longingly at thè graphics and 
sounds of thè less expensive com- 
petitors. Will these people have to 
shell out thè 600 bucks and learn a 
new Basic and modification of 6502 
assembly to satisfy their smoldering 
desires? Will Apple get busy fast on a 
new machine? Or will, perhaps, a 
new peripheral board for less than 
half thè price of a Commodore 64 ap¬ 
pear to solve thè whole problem? 
There are a few companies presently 
offering such hardware, but at such a 
user-unfriendly stage that for thè 
most part only hobbiest hackers will 
be attracted. What I’m wondering is 
whether or not a mass market quality 
product will soon appear. Suffice it to 
say that neither you nor I believe that 
any Apple owner really wants to 
jump to another computer to get 
something thè Apple is quite capable 
of doing itself—with a little help. 


Remember, there are dose to 
500,000(?) Apple owners. I hear a 
different figure every time, but at this 
writing, January 1983, there appear 
to be about 20,000 Commodore 64 
owners. That ought to say some¬ 
thing, especially when you consider 
thè huge mountain of software and 
peripherals available for thè Apple. I 
can’t help but feel that regardless of 
what thè people at Apple Computer 
do, thè innovative, loyal Apple users 
(and software producers) will see thè 
deluge of new, cheap machines (it’s 
coming, it’s coming!) as a delightful 
challenge, and anything but a cause 
for alarm. I welcome your comment 
on this subject. 

Coming Soon 

In next month’s column I’ll explain 
scrolling and more. Bye for now! ■ 
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Book Reviews 


What's Where in thè Apple: 

A Complete Guide to 
The Apple Computer 
by William F. Luebbert 
Micro Ink 
34 Chelmsford St. 

Chelmsford, MA 01824 
Softcover, $24.95 

T here are two ways to travel— 
you can take thè eleven coun- 
tries in seven days tour, spending 
your time at thè usuai tourist haunts 
or you can take a leisurely trip, search- 
ing out special places far from thè 
beaten track. William Luebbert has 
written a guidebook for thè second 
kind of traveler. And with his What’s 
Where in thè Apple you can explore a 
side of your computer that few peo- 
ple ever see. 

The book is divided into three 
parts: Part I, thè first 150 pages, pro- 
vides an overview of thè Apple hard¬ 
ware and firmware and outlines 
methods that even a beginning pro- 
grammer can use; Part II is an atlas 
with over 2000 numerically ordered 
listings of specialized locations in thè 
Apple memory; Part III is a gazetteer 
and contains thè same information as 
thè atlas except that thè list is in al- 
phabetical order. 

You don’t need to be a machine 
language expert to make use of 
What’s Where in thè Apple. In fact, 
you can use a high level language like 
Basic in conjunction with PEEK, POKE 
and CALE. Ón thè other hand, if you 
are a serious machine language pro- 
grammer, why go to all that trouble 
when all you have to do is take ad- 
vantage of thè operations built into 
thè Applesoft or Integer Basic com¬ 
pier, or thè computerà monitor? 

After introductory chapters on 
PEEK, POKE, CALL and machine lan¬ 
guage programming, thè book dis- 
cusses in great detail thè Apple’s 
memory, starting with page zero and 
going through thè System monitor 
and page FFFF. What’s Where in thè 
Apple answers questions such as 
where old strings go, or why OUT OF 
MEMORY messages occur, or how thè 
Apple Stores information on a disk. 

What’s Where in thè Apple guided 
me through several problems thè first 


week I owned it. I learned a new 
(and better) way to include short ma¬ 
chine language routines in a Basic 
program. The book also explained 
why a high-resolution display myste- 
riously failed in thè middle of a pro¬ 
gram. It wasn’t thè hardware; my 
program had outgrown its space and 
encroached on thè graphics memory. 
In both cases I probably could have 
solved thè problem on my own but 
instead I relied on Luebbert’s advice 
and avoided much frustration. 

While thè first part of thè book has 
been thè most useful to me, I am 
slowly becoming familiar with thè 
atlas and gazetteer sections. As I gain 
confidence integrating machine lan¬ 
guage with Basic, I find myself bor- 


"You don't need to be a 
machine language expert 
to make use of What's 
Where in thè Apple ." 


rowing routines from thè Apple’s 
firmware. The atlas and gazetteer 
listings include thè address in hexa- 
decimal and signed decimai format, 
thè common name for thè function or 
location, use, and descriptions that 
affect CPU registers. A typical entry 
is; $002D (45) [SECT PI DOS RWTS (READ- 
WRITE TRACK-SECTOR) PARAMETER 
FOR CURRENT DISK SECTOR. The 
publisher also offers a software ver- 
sion of thè atlas and gazetteer. You 
can get a disk for $14.95 that includes 
thè listings and a retrieval program. 

This book is lacking in several 
areas. The 20 pages devoted to ele- 
mentary machine language pro¬ 
gramming, though very well done, 
are no substitute for a full treatment 
of thè subject. Nor is What’s Where 
in thè Apple a guide for beginning 
Basic programmers or a replacement 
for Apple’s hardware oriented refer- 
ence manual. 

It is easy to justify passing by 
What’s Where in thè Apple and buy- 
ing a new game. But if you want to 
write your own game you had better 
think twice; thè $24.95 for this book 
is cheap compared to thè time you 


could invest learning its lessons on 
your own. 

Like tourist guides, What’s Where 
in thè Apple isn’t for everyone or a 
substitute for experience and pa- 
tience. Isn’t it nice though, to know 
that someone has been there before 
you and is willing to make your trip a 
little easier? What’s Where in thè Ap¬ 
ple could be just thè ticket for any se- 
rious-minded Apple programmer. ■ 
Timothy Daniel 
Oxford, OH 

Apple Fortran 

By Brian D. Blackwood 
and George H. Blackwood 

Howard W. Sams & Co., Ine., Indianapolis, IN 
46268; Softcover, $14.95 

A s stated on thè back cover of 
this 236 page book, this is a 
“detailed language manual” for thè 
Fortran programming language as 
supplied by Apple Computer Ine. for 
use on thè Apple computer. This is 
not a book for you if you have no in¬ 
terest in learning how to write pro- 
grams in Fortran. 

Chapters include an interesting in- 
troduction to computers in generai, 
Apple Fortran, thè rules of Fortran, 
how to input data from keyboard and 
disk, and how to output data to disk, 
printer and monitor screen. There 
are also several chapters on thè vari- 
ous structures of Fortran and how 
they are implemented on thè Apple 
computer. 

The authors have done a very good 
job of givingstep-by-step examples of 
how to write, compile, run and save 
Fortran programs on thè Apple com¬ 
puter. Each programming concept is 
presented in thè form of a short pro¬ 
gram. A chapter (nine pages long) is 
devoted to thè use of thè Apple Pascal 
Operating System, which is used by 
Apple Fortran and is supplied on disk 
with thè Fortran System. The instruc- 
tions are very easy to use because in¬ 
formation can be found in a few 
pages rather than having to search in 
several books. The last chapter in thè 
book (eight pages long) is on using 
two or three disk drives. As stated by 
thè authors, programming is much 
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4 


easier when using two or three disk 
drives because disks are placed in thè 
proper drives and left there for thè 
duration of thè programming sessi on. 

The authors do not assume any 
knowledge of Fortran on thè part of 
thè reader. Although prior program¬ 
ming experience would be a great 
help, no programming background is 
required to write programs in For¬ 
tran if you follow thè steps in this 
book. By typing in and running thè 
program examples you can get a feel 
for how to write your own programs. 

The book lacked two important 
additions: 1) a list of error codes and 
their meanings so thè Apple FOR¬ 
TRAN Language Reference Manual 
does not need to be referenced while 
writing programs; and 2) a more 
complete index that lists AND, OR, 
NOT, .LE., etc. as separate entries. 
Also, a few of thè program listings 


... no programming 
background is required to 
write programs in Fortran 
if you follow thè steps 
in this hook.” 


were printed lighter than thè text and 
that makes them hard to read when 
typing thè programs into thè comput¬ 
er. The book is bound to He fiat 
(good), but thè binding is a size too 
small for thè thickness of thè book 
and that crumples thè pages (bad). 

In conclusion, this is a handy book 
for both experienced and novice pro- 
grammers because it concentrates in- 
formation about thè statements and 
operations of Apple Fortran, as well 
as information about thè use of thè 
Apple Pascal Operating System, into 
one easy-to-understand and easy-to- 
use volume. 

It should be noted that thè Apple 
language card or other plug-in mem- 
ory expansion card is required in ad- 
dition to thè Apple Fortran System to 
write programs in Fortran. ■ 

John Davison 
Ft. Walton Beach, FL 



NEW WAYS TO 
POLISH YOUR 
APPLE* 



CALO-IO*: HOT ìEAIUhVS 



1. 5CREEN SCRIDE 

Display text and special characters anywhere on 
your high-res graphics screen. Any size, any shape, 
in your choice of seven different colors. Contains 
subroutine to create title page or any graphics dis¬ 
play you wish. 

Apple II Disk Applesoft 32K 
0438AD $19.95 

2. SECTOR EDITOR 

Get fast and total access to any info on your Apple 
disk. Modify files, BASIC programs, systems pro¬ 
grams or data by altering, adding or deleting info 
with ease. Single keystroke commands! A disk edit¬ 
ing magician. 

Apple li or Apple II Plus 48K 1 or 2 disk drives 
0389AD $39.95 

3. MAILING LIST 

Turn your Apple into thè ultimate personal tool! 
Print addresses on labels or two sizes of envelopes. 
... Handles up to 150 names, addresses and phone 
numbers. Search for last names or company names 
on file. Many more features! 

Apple II Disk Applesoft 48K Compatible printer 
0410AD $29.95 

4. BUSINESS CYCLE ÀNALYSIS 

Now you can get a flexible, professional time series 
analysis instrument for your Apple, Business Analy- 
sis helps you analyze various business climates and 
cycles; undertake product planning; analyze stocks, 
company trends and growth rates. Lets you store 
graphs of cycles and trends to aid your decision- 
making. Business Cycle Analysis turns your Apple 
into an invaluable business assistant. 

Apple Applesoft 48K 1 disk drive 
0406AD $59.95 

'Apple is a registered trademark of Apple Computer, Ine. 

I wont to polish my Apple with thè following 
New programs: 

_copies of 0410AD @$29.95 _copies of 0438AD @$ 19.95 

_copies of 0406AD @$59.95 _copies of 0389AD @$39.95 

Please add $2.50 for postage and handling. 

□VISA CMC QAMEX DCHECK/MO 


ORDER TOLL FREE 
1-800-258-5473 
INSTANT SOFTWARE 
RTE. 101 & ELM STREET 
PETERBOROUGH, NH 03458 
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FRIENDLY SERVICE 


Business & Utilities 


Accent Software 

Soft-Step.$ 34 

Accu-Shapes.$ 34 

Loop-Hole.$17 

The Graphic Solution.$ 95 

Applied Software 

Versaform. $239 

Artsci 

Magie Window li. $95 

Ashton-Tate 

dBase II (Req. Z-80).$419 

Avant-Garde 

Hi-ResSecrets.$ 79 

Ultra Plot/DataGraph.$ 62 

Graphics Application System. 1 49 

Beagle Brothers 

Apple Mechanic.$ 20 

Tip Disk .$ 15 

FlexText.$ 20 

Frame Up.$ 20 

Typefaces.$ 15 

Broderbund 

Payroll .$249 

Accounts Receivable.$249 

The Bank Street Writer.$ 39 

Continental Software 

The Home Accountant.$ 48 

Ist Class Mail .$ 48 

CPA Module #1 — G/L.$159 

CPA Module #2 — A/R .$159 

CPA Module #3 - A/P.$159 

CPA Module #4 - Payroll.$159 

CPA Module #5 — Property Mgt . . ..$159 
The Form Letter.$ 20 

Crane Software 

Menu Generator .$ 27 

Cybertronics 

Karel thè Robot.$159 

Dakin 5 

The Depreciation Planner.$249 

The Budget Planner .$ 95 

The Business Bookkeeping System $249 

Datamost 

R E I.P. .$ 82 

Write-On.$ 82 

Personal Ledger.$82 

The Market Technician.$ 82 

The Property Manager .$189 

Datasoft 

Micropainter .$ 23 

Datasm65 2.0 .$ 59 

Usp Interpreter.$ 79 

The Basic Compiler.$ 65 

Data Transforms 

Graphtrix 1.3 .$ 49 

Delta Software 

The Bookkeeper Master Program ,..$ 59 
The Bookkeeper Check Writer.$ 27 

Denver Software 

Pascal Tutor.$ 82 

Pascal Programmer .$189 

Financial Partner. .. $159 

DJR Associates 

FMS-80 (Req. Z-80).$545 

FMS-81 (Req. Z-80).$235 

FMS-82(Req Z-80).$235 

Don’t Ask Software 

S A M. $ 79 

Eagle Software 

Money Decisions.$129 

Fox & Geller 

Qurck Code (Req. Z-80).$189 

Dutil (Req. Z-80).$62 

Hayden Software 

Pie Writer/Multi 80-col.$ 95 

Pie Writer/Standard..$ 95 

Hayes 

Microcomputer Products 

Hayes Terminal Program.$ 65 

Highlands Computer 

E-Z Ledger.$ 39 

Howard Software 

Creative Financing.$129 

Reai Estate Analyzer li.$119 

Tax Preparer 1983 .$145 
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Business & Utilities 


Insoft 

Transforthll.$ 79 

Aid System II.$49 

Graforthll.$ 49 


LJK Enterprises 

Letter Perfect with Mail Merge .$ 95 

Data Perfect.$ 69 

Edìt 6502.$69 


ISM 

Mathemagic.$ 59 

Graphmagic.$ 59 

IUS 

Datadex.$ 99 

Professional Easywriter .$115 

Tellstar Level I.$ 27 

Tellstar Level II.$ 52 

Forth Development System.$ 89 

Professional Easymailer.$ 99 

Originai Easywriter.$ 65 

Originai Easymailer .$ 45 

Easymover.$ 62 

Pro. Easywriter/Mailer Combo.$189 

Orig. Easywriter/Mailer Combo.$ 89 

Kensington Microware 

Format II.$159 

Link Systems 

Datafax.$119 

Datalink.$ 62 

Link Index.$ 90 

Link Video.$ 34 

Link Disk.$ 45 


Lotus 

Executive Briefing System.$125 

Micro Lab 

The Invoice Factory.$129 

The Asset Manager.$129 

The Tax Manager.$ 95 

Data Factory 5.0 .$189 

Wall Streeter.$189 

Payroll Manaoer .$189 

Microsoft 

Tasc Compiler. $119 

Fortran-80 (Req. Z-80).$125 

A.L.D.S. (Req. Z-80) .$ 79 

Basic Compiler (Req. Z-80).$249 

Cobol-80 (Req. Z-80).$459 

muLisp/muStar-80 (Req. Z-80) .$125 

M-Sort-80 (Req. Z-80).$125 

muMath/muSimp-80(Req. Z-80).$159 

Time Manager.$ 95 

Multiplan (Apple Dos or Z-80).$175 

Micro-Sparc 

Ampersoft .$ 34 

Directory Master.$ 20 



Education 


Bumble Plot.$ 39 

Gertrudes Secrets.$ 49 

Gertrudes Puzzles.$ 49 

Rocky's Boots.$ 49 

Snooper Troops #1.$ 30 

SnooperTroops#2.$ 30 

Story Maker.$ 26 

Face Maker.$26 

Compu-Read . $ 23 

Spelling Beew/Reading Primer.$ 27 

Algebra I.$ 34 

Fractions.$ 34 

Deci mais.$ 34 

Master Type. $ 27 

TypeAttack.$ 27 

Wordrace..$ 17 

Dueling Digits.$20 

SAT Word Attack.$ 34 

New Step by Step .$ 59 

Delta Drawing .$ 45 

Harcourt Brace S.A.T. Series.$ 59 


Spanish For-Traveler.$ 39 

Whole Brain Spelling .$ 23 

Speed Reading Courseware.$ 65 

Speed Read Plus.$ 39 

PSAT Word Attack Skills.$ 34 

Perception. $ 17 

Word Scramble/Super Speli $ 15 

U.S. Constitution Tutor .... $ 20 

Algebra II.$ 20 

Algebra IH.$27 

The Linguist.$ 27 

Know Your Apple.$ 23 

E-Z Learner.$ 24 

Crossword Magic ..$ 34 

Counting Bee.$ 20 

Compu-Math/Arith. Skills.$ 34 

PlanetaryGuide.$ 23 

Star GazersGuide.$ 22 

Astro Ouotes.$ 17 

Juggles Rainbow.$ 30 

Bumble Games.$ 39 


Computer Outlet 


Park Place — Upper Level 
1095 E. Twain — (702) 796-0296 
Las Vegas, Nevada 89109 


c ! 800 - 634-6766 


Order Line 
Only 


Information Order Inquiries (702) 369-5523 


We accept Major Credit Cards 


Mon.-Fri. 8 A.M.-6 P. M. 

Sat. 9 A.M.-5 P. M. 
Dealer Inquiries Invited 


Business & Utilities 


Systems Plus 

Accounting Plus — G/L.$239 

Accounting Plus (GL. AP, AR).$499 

Accounting Plus (GL. AP. AR. INV) . $629 

Muse 

Super Text 40/80.$115 

Super Text 40/56/70(Hi-Res).$ 79 

Novation 

Deaf Disk.$23 

Software Diskette.$ 23 

On-Line 

Screenwriter II.$ 82 

The Dictionary.$ 65 

Lisa 2.5.$55 

Lisa Educational System.$ 75 

The Artist.$ 55 

Screenwriter Professional.$129 

The General Manager II .$149 

PBL Corporation 

Personal Investor . $ 95 

Peachtree 

(All Peachtree produets require a Z-80 card) 

Series 40 Acc i Packages.ea. $239 

Series 80 Acc't Packages.ea. $239 

Peachtext.$289 

Spelling Proofreader .$179 

Mailing List Manager. . . .$209 

Penguin Software 

Complete Graphics System.$ 49 

Special Effects.$ 27 

Graphics Magician.$ 39 

Additional Fonts& Char. Sets.$ 15 

Complete Graphics System II.$ 79 

(Apple Tablet Version) 

Special Effects (Apple Tablet Version) $ 49 

Select 

Selectword Processing Sys.$299 

Sensible Software 

SensibleSpelier.$79 

Image Printer.$ 27 

Super Disk Copy III.$ 20 

Multi Disk Catalog III.$ 17 

Disk Recovery.$ 20 

Quickloadèr.$ 17 

The Bug.$ 34 

Silicon Valley 

Word Handler II.$129 

List Handler.$ 59 

Dictionary.$ 79 

Stoneware Products 

D B. Master.$145 

D B. Master Utility Pak #1. $ 65 

D B. Master Utility Pak #2.$ 65 

Graphics Processing Sys. (Standard) . $ 49 
Graphics Processing Sys. (Pròf.).$119 

Synergistic 

The Data Reporter .$159 

Integer Basic Compiler.$ 95 

Global Program Line Editor.$ 45 

The Inventory Manager.$95 

Software Publishing 

PFS: Report.$ 59 

PFS $ 79 

PFS: Graph.$ 79 

Sorcim/ISA 

Supercalc (Req. Z-80).$179 

SpelIguard (Req. Z-80).$125 

Southeastern Software 

Data Capture 4.0.$47 

Data Capture 4.0/80.$ 59 

Southwestern Data (New) 

Apple Doc.$ 27 

Ace.$27 

List Master.:.$ 27 

Speed Star .$ 65 

Correspondent.$ 39 

Z Term (Req. Z-80).$ 65 

Z Term "The Professional” (Req. Z-80). $ 99 

P Term "The Professional”.$ 85 

Ascii Express "The Professional” ... .$ 85 

Disk Library.$ 34 

Doublé Time Printer.$65 

Financial Management System II .... $ 45 

Munch-a-Bug . .$ 34 

Printerographer.$ 34 

Routine Machine .$ 45 

Visicorp 

Visicalc 3.3.$165 

Visiplot.$139 

Visitrend/Plot .$199 

Visidex .$f65 


Circle 254 on fìeader Service card. 


















































































































































































































EVERYPAY LOW PRICES 

PERIPHERALS 


TOP 

SELLERS 

Entertainment 


Snappei.. $20 

Toddlers Tutor.$16 

Cyborg . .$22 

Congo.$23 

Goldrush . $23 

Alien Lander.$20 

Retro-Ball. $20 

Space Adventure.$20 

International Grand Prix.$20 

Conglomerates Collide.$27 

Battlesight.$27 

StarshipCommander.$20 

AmoebaMan.$23 

TheGauntlet.$23 

Crisis Mountain.$23 

Nightmare Gallery.$20 

U-Boat Command.$20 

Escape Prom Arcturus.$20 

Atlantis.$27 

Odyssey. .$20 

Epidemie .$23 

Galactic Adventure.$39 

Cytron Masters.$27 

Galactic Giadiator.$27 

TheCosmic Balance.$27 

The Battleof Shiloh .$27 

S.E.LU.S.$27 

Guadacanal.$39 

Pursuit of theGraf Spree.$39 

The Shattered Alliance.$39 

Opera.tion Apocalypse.$39 

Computer Bismarck .$39 

Napoleoni Campaign. $39 

“The Alien Game".$23 

Norad ...$23 

Knight of Diamonds.$23 

The Biade of Black Pool.$27 

WayOut. $27 

Space Eggs.$20 

Phantom's Five. $20 

Pulsarli .$20 

Sneakers . .$20 

Outpost .$20 


SYSCOMII64K . $799 

(Apple Compatible) 

or 

OUR 

SPECIAL PACKAGE 

Syscom I! 64K, NEC Green 
Screen Monitor, Fourth Dimen- 
sion Drive with Controller, Moni¬ 
tor Stand, System Saver Fan, 
Word Handler Word Processing 


[package .. $1599 


Mystery House.$17 

Missioni Asteroid .. $15 

Fiazzle.$17 

Castles of Darkness.$23 

Acey Deucey .$20 

Zargs.$23 

Spider Raid .$20 

Zork Ili. $27 

Juggler.$20 

Mummy's Corse.$20 

Kamikaze ..$23 

Shuttle Intercepts.$23 

Horizon V.$23 

LazerSilk.$20 

Zenith . ..$23 

High Orbit.$20 

Phaser Fi re.$20 

Prisonerll.$23 

Rendezvous.$27 

Empire IHnterstellar Sharks .$23 

Rubicks Cube Unlocked...$17 

Wordrace.$17 

Zaxxon.$27 

Fathom's Forty.$23 

Solitaire & Cribbage.$23 

Mars Cars.$20 

Money Muncher.$20 

Crazy Mazey.$20 

Raster Blaster.$20 

S.A.G.A Adventures.ea. $27 

Serpentine.$23 

Choplifter.$23 

Frogger.$23 

Sea Fox.$20 

Hard Hat Noah. . . $20 


Softcard.$ 229 

Ramcard.$ 69 

Microsoft Premium Sys.$ 479 

(Contains Softcard, Ramcard, 

Videx Videoterm) 

Fortran 80.$ 139 

System Saver Fan.$ 65 

Flip & File Diskette Box.$ 21 

Co boi-80 . .$ 449 

Extended muMath.$ 169 

Enhancer II.. ..$ 99 

EZPort.$ 19 

Game Paddles.$ 29 

Joystick.$ 39 

Select-a-Port.$ 39 

LowerCase Adapter.$ 25 

Mannesman Tally 160.$ 799 

Citoh Prowriter .$ 439 

Microtek Apple Parallel 

Interface.$ 79 

Apple Adapter(Wico Joysticks).. . .$ 17 

Wico Joystick . $ 23 

Wico Redball.$ 24 

WicoTrackball. $ 49 

12 Foot Ext. Cord.$ 9 

Microbuffer II 16K Parallel.$ 169 


Microbuffer II 32K Parallel.$ 199 

Kraft Joystick ..$ 45 

Kraft Paddles.$ 34 

Apple Dumpling GX.$ 95 

Buffered Dumpling 16K.$ 155 

Buffered Dumpling 32K.$ 199 

8088 Coprocessor Board .$ 549 

TheJoyport.$ 34 

TGTrakBall.$ 45 

Versawriter Graphics Tablet.$ 209 

Videoterm 80 Column Board.$ 229 

Vision 80 Board ...$ 189 

IDS480 Printer..$ 529 

IDS Prism 132 Printer.$1299 

AmdekAmber Monitor.$ 179 

Amdek Digital Plotter.$ 729 

Amdek 3" Micro Floppy 

Disk Drive.$ 699 

Microline84P.$1029 

Microline 83A.$ 679 

Microline82A.$ 429 

Daisywriter Letter Quality 

Printer.$1129 

Corona Starfire 5 MB Drive.$1050 

Corona Starfire 10 MB Drive.$2289 


TOP 

SELLERS 

Entertainment 


Fly Wars. $20 

Cyciod . .$20 

Kabul Spy.$20 

Zero Gravity Pinbali.$20 

Copts and Robbers.$23 

Escape from Rungistan.$20 

Lemmings . $20 

Computer Foosball.$20 

The Battleof Shiloh .$27 

Electric Duet. $20 

Tempie of Apshai.$27 

Tuesday Morning Quarterback .$20 

Hi-Res Computer Golf. . .$20 

David’s Midnight Magic.$23 

Track Attack.$20 

Apple Panie.$20 

Ultima . . ..$27 

Bug Attack.$20 

Snack Attack.$20 

Thief. .. $20 

County Fair.$20 

Compu-Read .$20 

Empire I World Builders.$22 

Firebird.$20 

Sargon II.$23 

Zork I.$27 

Zork II.$27 

Pool 1.5.$23 

Castle Wolfenstein.$20 

Threshold.$27 

Mousekattack.$23 

Hi-Res Football.$27 

Hi-Res Soccer.$20 

Time Zone .$65 

Wiz & Princess.$22 

Ulysses & The Golden Fleece .$23 

Wizardry.$34 

Hadron.$23 

Beer Run..$20 

Gorgon.$27 

Photar. $20 

Warp Factor :.$27 

Tigers in the.Snow.$27 

Computer Baseball.$27 

Ceiling Zero. $20 

Sherwood Forest.$23 

The Queen of Phobos.$23 

Bez Wars.$19 

Bez Man.$16 

Star Blazer.$22 

Cross Country Rallye.$20 

Swashbuckler.$23 

TumbleBugs.$20 

RearGuard.$20 

Hungry Boy .$17 

Dneiper River Line.$20 

Labyrinth.$20 

Oil Rig.$27 

Human Fly.$27 

Deadline.$34 

Minotaur.$23 

Bandits.$23 

Oil Barons .$65 

Monster Maze.$20 

New World.$20 

GFSSorceress.$23 

Telengard.$19 

Starcross.$27 

Aztec.$27 

Tubeway.$23 

Vegas Video.$20 

Odin .$34 

Star Maze.$23 

Zendar .$20 

Front Line. . . ..$20 

Maskof thè Sun.$27 

Pest Patrol. $20 

LunarLeeper.$20 

Pie Man.$20 

Thorolian Tunnels..$20 

Canyon Ciimber.$20 

Alien. $19 

Normandy .$27 

Germany. $39 

Miner 2049er .$29 

AE.$20 

Repton.$27 

Moon Shuttle.$27 

Spy’s Demise.$20 

Space Vikings.$34 

FlipOut.$20 

Wavy Navy.$23 

Bomb Alley. $39 

Ultimali . $39 



*** SPECIALS OF THE MONTH *** 


**ElephantDisks(Box).$ 20** 

“AmdekColori Monitor.$ 309** 

“MicromodemII.$ 259** 

“Novation Apple Cat II Modem.$ 329** 

“TheGrapplerPlus . $ 119** 

“NEC 8023A Printer.$ 459“ 

“Rana Systems 40 Track Disk Drive.$ 299“ 

** Rana Systems SO Track Disk Drivé.$ 559“ 

“The Word Handler.$ 129“ 

“NEC 3530 Printer.$1599** 

“Qume Sprint 11 + Printer.$1359** 

“HayesSmartmodem300 .$ 209** 

“Amdek Color II Monitor...$ 659 ** 

“HayesSmartmodem 1200 .$ 499 ** 

**Citoh Prowriter. .$ 419 ** 

“Screenwriter II.$ 82 ** 


Computer Outlet 

Ca F ':™' 800-634-6766 0,d 0 % me 

Information Order Inquiries (702) 369-5523 

ORDE RING INFORMATION AND TERMS: 

Fot Fast Delivery send cashier checks, money orders or direct bank wire trans- 
fers. Personal and company checks allow 3 weeks to clear. C.O.D. orders ($3.00 
minimum) and 7% of all orders over $300. School purchase orders welcomed. Prices 
reflect a cash discount only and are subfect to change. Please enclose your phone 
number with any orders. Shipping — Software ($2.50 minimum). Shipping — Hard¬ 
ware (please cali). Foreign orders. APO & FPO orders — $10 minimum and 75% of 
alt orders over $100. Nevada residents add 5%% sales tax. All goods are new and 
include factory warranty. Due to our low prices, all sales are final. All returns must 
have a return authorization number. Cali 702-369-5523 to obtain one before returning 
goods for repiacement. All returned merchandise is subject to a restocking fee and 
musi come with their originai packaging in order to be accepted. 

NO returns permitted after 21 days from shipping date. 
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'///’s Company 


by Bill O'Brien 



Chips Ahoy! 

W hen Apple reintroduced thè 
III a year and a half ago, I 
thought it would be nice to make sure 
they had really removed all of thè 
bugs, especially thè heat build-up 
failures thè originai versions were 
prone to. The day I set it up, I bor- 
rowed a hair dryer from thè love-of- 
my-life and went to work. With thè 
III on, I heated thè bottoni, then shut 
it off, wrapped it in plastic, and stuck 
it in my refrigerator overnight. (Keep 
in mind I strongly recommend you 
don’t do anything even remotely sim- 
ilar.) The next day I removed thè Ap¬ 
ple, and after sampling its light flaky 
crust (wait a minute, that was thè 
pie), plugged it in and it worked, I 
felt great. It had passed thè fire 
and ice test, and I hadn’t even used 
Shell oil! 

As I said, that was a year and a 
half ago. Sometime last week, my III 
developed a problem. While I was 
pounding out thè prose that consti- 
tutes this column, it started to display 
strange watery lines down thè edge of 
thè screen, or, when in a perky 
mood, it told me my volume wasn’t 
found when I tried to save to disk. At 
other times, I would get an SOS ERROR 
$01, or there would be lovely vertical 
rules (j) attached to some of thè 
screen characters. 

Most normal people, given these 
circumstances, would take thè beast 
to thè locai repair shop and be done 
with it. I could hardly be classified as 
normal. Besides, repairs to an Apple 
III can, at times, be expensive. 

What to do? While I pondered 
weak and weary, through this maze 
of problems dreary, a thought sprang 
to mind. Why not take thè III apart 
myself? 

Kidding aside, though, while not 
overly difficult, it’s not thè kind of 
thing someone who’s never delved in- . 


to a computer should tackle unaided. 
I’m checked out to Service a few com- 
puters and some printers, and I’ve 
always been a tinkerer of sorts. Most 
importantly, I’m only about 30 per- 
cent clutz. Anything over that is real¬ 
ly unacceptable. Keep in mind that if 
you do any gross damage, and thè 
machine is under warranty, you may 
well void your warranty. Check on it 
first, or you may be stuck trying to 
find a very sympathetic Ser¬ 
vice tech. 

Down and Out 

To start I made sure there were no 
disks in thè drive and turned thè III 
off. Then I removed thè power cord. 
That’s essential. If you don’t, and you 
should happen to turn thè computer 
on in thè middle of dismantling 
it. . . well, do you remember thè bi- 
centennial fireworks display? Unplug 
all thè other cables (video, disk drive, 
printer) and remove thè monitor 
from atop thè machine. Heft thè III 
and move it to your work area. I use 
thè floor. It’s spacious, fiat, and my 
dog only walks on it to and from her 
water dish (otherwise she walks 
on me). 

On either side of thè top cover (thè 
piece that sits like a hat on thè III and 
covers thè internai disk drive) there 
are regular head screws. They don’t 
come out, but by applying a screw- 
driver with thè appropriate biade 
width, you can twist them enough to 
release thè cover. Make sure thè disk 
drive door is closed bejore you re¬ 
move it. Next it would be wise to re¬ 
move any boards inside, like thè 
UPIC or thè Profile interface. Now 
lean thè III back on thè rear panel so 
thè keyboard points to heaven. 

Before your wondering eyes should 
appear a silver bottom with screws 
far and near. Many screws. Many, 


many screws. And they’ve all got to 
come out. Actually, there are two 
panels, one thin, thè other wide; thè 
thin one hides thè power supply and 
should be left untouched. While 
you’re twirling your Phillips head 
screwdriver, be sure to support thè 
bottom panel so it doesn’t swing out 
all of a sudden. Yes, even thè two 
screws on thè little metal mounds 
must come out. 

Carefully, ever so carefully, move 
thè bottom panel away from thè cas- 
ing, making sure you don’t discon- 
nect any of thè wires you see. With 
your left hand disconnect thè power 
connector (thè only connector on thè 
left side). This is thè shortest of all thè 
cables inside, and you’U have a little 
more leeway to get at thè rest once it 
is removed. 

With thè power cable gone, ease 
thè bottom panel out a little further. 
At thè rear, on thè right side, you’ll 
see three more cables. Two of them 
are blue ribbon-type connectors, thè 
other is a black two-wire cable with a 
white connector on thè end. That’s 
thè next one out. It’s thè speaker 
cable, and if you haven’t pulled it out 
just by moving thè bottom piate a lit¬ 
tle further than you should, just keep 
pulling—carefully. 

Next are thè ribbon cables. The 
furthest back comes from thè disk 
drive and thè other from thè key¬ 
board. They have keyed connectors, 
which means that, unless you exercise 
phenomenal cunning and craft, you 
won’t be able to plug them in back- 
wards. Slipping thumb and forefin- 
ger back where they sit, and using a 
gentle rocking motion, remove them. 
(Caution: Do not pulì by thè cables!) 


Address correspondence to Bill O'Brien at 
WABASA Consulting ir Management. Ili 
Brook St., Scarsdale , NY 10583. 
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NOW, USE ALL THE POWER OF THE APPLE He 
FOR FAST, EASY WORD PROCESSING 


write Away is a new, full- 
function word processing 
System designed specifi- 
cally for thè Apple ile. 

It will also run faster than 
any other word processor 
when using 48K or 64K 
Apple II systems. 

write Away is ideal for 
both thè advanced pro¬ 
fessional or novice user. It 
is fast, versatile, powerful 
and easy to use. . . Just 
what you need to pro¬ 
duce any type of docu- 
ment. Write Away has all 
of thè advanced features 
you would expect from a 
professional word processing System. 

write Away is easy to learn and use 

,,. thè manual is organized by chapters, 
and has a complete index as well as 
reference sections, in which each com- 
mand is carefully explained with ex- 
amples. write away has screen tutorials, 
a "Help" screen and a handy stand-up 
command reference card. You'll also use 
single keystrokes for deleting, searching, 
inserting, cursor movement and other 
commands. write Away allows condi- 
tional text ("If. .. Then” text selection). 


It’s fast . . . write Away 
uses s&H's TDE ("thè DOS 
enhancer) for fast System 
loading. write Away pro- 
grams are written in 6502 
machine language using 
advanced programming 
techniques. As a result, 
commands are executed 
and files are loaded with 
amazing speed. 

Extra features ... write 
Away uses standard Apple 
DOS text files for easy 
interfacing with popular 
programs... VisiCalc, Sen- 
sible Speller and more. It 
also has a dif file trans- 
lator and other Utilities 
for creating a mailing list from DB Master 
and other data bases. . . mail merge 
System included. 

Automatically utilizes RAM card, upper/ 
lower case and recognizes videx, 
Smarterm, Vision 80, Wizard 80, Sup R 
Term, Full View 80, Viewmax-80 and both 
Apple Ile 80-column boards. Write Away 
will work with any printer. 

Awarded thè recommended seal of 
approvai by thè Professional software 
Programmers Association. 



ONLY 

$175 



RITE AWAY 


Midwest Software Associates 

PO. BOX 301 St. Ann, MO 63074 
cali toll free 1-800-835-2246/Ext. 467 
(In Missouri 1-800-362-2421 /Ext. 467) 

Apple and Apple ile are registered trademarks of Apple Computer, Ine. 
VisiCalc is a registered trademark of VisiCorp, ine. 

DB Master is a registered trademark of Stoneware, ine. 
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Now separate thè motherboard fully 
from thè case. The bottoni metal 
panel should come along with it; 
they’re very good friends. 

Keep in mind that micro-electron- 
ics is just a later branch of magic. As 
such, you will find that your III is af- 
fected by thè four elementals: water, 
earth, wind, and fire. In other 
words, be careful during this whole 
process about static charges, cats, 
dogs, heat, cold, and little children. 

Chipping Away 

Having proceeded confidently 
thus far, I laid thè motherboard out 
on thè floor, set up suitable barri- 
cades to keep out thè German 
Shepherd tide, and scrutinized thè 
board. There was no obvious prob- 
lem, at least not from a medium alti- 
tude vertical pass. I switched on a 
lamp and, magnifying glass in hand, 
I went over it again from a different 
point of view. 

There was stili no sign of gross 
damage, but I did notice a few 
things. Spanning three or four paral- 
lel trace lines was some beige-colored 
crud that looked fried on, and two of 
thè chips had patches of green stuff 
on their legs. 

Rousting around in my desk 
drawer, I extracted my chip pullers. 
Almost everyone’s seen thè typical, 
Steel, thong-like kind that Apple sup- 
plies with thè Language System for 
thè II. Those are great for grabbing 
74LS125s and other bitty chips, but 
thè damage they can do to a 2732 or 
8051, or even a 6502 (if you can 
stretch them that far), is consider- 
able. For those larger devices, you 
need a more substantial chip puller. 

You’re also going to need patience 
and understanding to get thè RAM 
board off. Many tiny wire fingere are 
held firmly in place by thè connectors 
on each side of thè board, and easing 
them out is a matter of time and thè 
most gentle of hands. Push a little 
here, push a little there, and eventu- 
ally it comes off. If you rush thè job, 
you’ll definitely damage something (I 
speak with thè voice of experiencel). 

With thè RAM board off, every- 
thing on thè motherboard is exposed. 
Notice that all of thè chips are identi- 


fied by alphabetic and numeric char- 
acters silkscreened around thè 
board’s edge. 

Starting at thè upper left corner, I 
began removing chips, one at a time, 
noting thè direction they faced. 
That’s important, because you don’t 
want to wind up with pin number 1 
in hole number 8. If you should re- 
seat thè chip backwards, thè hole 
with thè voltage will not be aligned 
with thè pin that needs it, in which 
case whether thè chip was originally 
bad or not becomes a moot point. 

It might be helpful to refer to Fig¬ 
ure 1, a diagram of a typical IC pin 
arrangement. There is usually a 
painted dot, or a circular impression, 
to identify pin 1. 

After I removed a chip, I checked 
it for bent or broken pins, inspected 
thè socket, and put it back, immedi- 
ately. Yes, thè Apple III mother¬ 
board has thè individuai chip num- 
bers etched next to each socket, but 
I’m a good good friend of Murphy 
and I’ve learned to take no chances. 

Across each row I worked, pulling, 
inspecting, replacing, The brown 
crud disappeared with a dose of alco- 
hol on a cotton swab. I bypassed thè 
two chips with thè green stuff for 
later on and worked my way to thè 
end of thè board. By thè time I was 
done, I had uncovered a surprise. 

I’ve had my III for a year or so, 
and there have been times when it 
has misbehaved just a little bit. On 
those occasions I just removed thè 
motherboard, pressed on all thè chips 
and back it went to working fine. 
Now, after pulling all thè ICs, I un- 
derstood what thè próblem was all 
along. Two of thè chips had pins bent 
up underneath, probably from when 
they were installed. After a few 
months, this just-barely-touching ar¬ 
rangement was ruined by oxidation, 
imperfect contact was made, and thè 
machine behaved strangely. Pressing 
thè chips down into thè sockets re- 
stored whatever contact there was to 
be had and all was well for a while. 
This time I put them on thè straight 
and narrow path! 

Straightening Up 

Which brings up another impor¬ 
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Figure 1. Typical IC pin arrangement. 


tant topic—unbending IC pins. Also, 
depending on thè finesse of whoever 
installed it, thè leg might not just be 
folded up under thè chip, it might 
also be mangled. If that’s thè case, 
you’ve got to reform it. 

Keep in mind thè pins are very 
fragile. In doing a few of them, I’ve 
found that prayer Works best. For 
those less devout, I would recom- 
mend small needle-nosed pliers with 
a good, fiat grip between thè jaws. 
This is one of those times when thè 
usuai 99 cent variety won’t work too 
well. By pulling at thè distorted pin 
with slovo, even pressure, you can 
straighten even thè most recalcitrant 
back to almost normal. 

I’d suggest that before you try this 
procedure for reai, you buy a few 49 
cent chips and mangle thè pins. Prac- 
tice on them for a while until you get 
thè hang of it, because some of thè 
chips in thè III are not readily 
available, and Murphy dictates that 
these are thè ones you’ll destroy. 
Keep in mind, also, that thè pins 
you’ve just straightened will be 
weaker than thè rest of them, so 
when you resocket thè chip, be extra 
careful. If you thought straightening 
them out thè firet time was risky, thè 
second or third time is really walking 
on thin ice. 

Wearing Off thè Green 

Remembering that green stuff on 
two of thè chips, I went back and 
pulled them. There was also green on 
thè sockets. It puzzled me for a while. 
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Micro Power Bench 1 



• Single Switch Control of CPU and Peripherals 

• Built in Circuit breaker protects your System 

• Four power expansion outlets 

• Opt. Power Surge ($40), Opt. Cooling Fan ($40) 

• IBM, Apple, TRS, Atari, Commodore, Others 


S 


DE.ALER 

INOUIRIES INVITED 1 


Dealer & Ordering Info 

800 - 343-4311 

Master Cnatut* and Vissi Accenird 
Scippine & Handling Charges Addipana' 

CAB-TEK, Ine. 

Riverside St. Nashua MH 03062 

DESKTOP ACOUSTIC 
SILENCERS FOR 
ALL POPULAR PRINTERS 
$99.to SI 99. 



NOW AVAILABLE F^OFR BOTH ! 

APPLE H/H + AND APPLE III 

PICK THAT TUNE conttin* 100 differsnt popular 
tunes dividsd into thess four categorie*: 

Pop, Country & Wasteen, Childran and TV tunas. 
Thara ara 16 diffsrent game variationt and 
from 1 to IO playara can play! Using tha sound 
genarator, PICK THAT TUNE wi 11 bagin with tha 
lowaat biddar and play tha number o-f nota* 
that aach playar has bid. High scorsa can ba 
obtainad by undarbidding your opponenti and 
picking tunes correctly. TOP TEN PLAYER f i 1 es 
are automatical1y maintained by PICK THAT TUNE. 
Whether your Apple is used for business or for 
pleasure, PICK THAT TUNE is a must for your 
software collection. (Apple III version 
requires Business Basic, Apple 3C/3C+ requires 
4BK). PICK THAT TUNE is avai labi e for *29.95 
at your locai computar stora or by sending 
check or money order to: 

Swearingen Software 
6312 W. Little York 
Suite 197 

Houston, Texas 77088 
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PROTECT YOUR APPLE* KEYBOARD 

WITH 

PLEXA-LOK 


PROTECT YOUR EXPENSIVE INVESTMENT 

OFFERED FOR THE FIRST TIME PLEXA-LOK COMES WITH A 
30-DAY MONEY BACK GUARANTEE IF NOT SATISFIED! 
PLEXA-LOK slips up and over thè keyboard - 
then gently snaps into posltion, 

• Your valuable computer is protected from objects and spills directly on top of keyboard 
which could cost hundreds of dollars to repair! 

• PLEXA-LOK allows your secretary to go on break without having to worry about visitors 
accidentally destroying their hours (and your $) of work. 



• TM APPLE COMPUTER Ine 


MON -FRI 9 00-5 00 



MasterCard and Visa Accepted 

Allow 4-6 Weeks 
Delivery 

Dealer Inquines Welcome 


CAST ELECTRONICS 

P O. BOX 1300S 
SAN ANDREAS. CA 95249 
(209) 754-1800 


INTRODUCTORY SPECIAL 

APPLE II $19.95 

APPLE III $24.95 

FROSTY 

APPLE 1.50 extra 

Prepaid UPS 
Continental USA 
CA Residents Add 6% Tax 


PROTECTING YOUR APPLE ... 
AN OPEN AND SHUT CASE 

“li 




Introducing the.APPLE- 
CENTER Model 12, an 
opening and closing 
cabinet for thè Apple 
Unlocked, thè APPLE- 
CENTER opens up 
toallowyouquick 
and easy access. 

Locked with thè 
key, thè APPLE-CENTER 
shuts tight to protect your 

Apple and 2 disk drives. The key also switches power to your 
Apple and your monitor. Both outlets are protected from dam- 
aging voltage surges with RKS Industries' SURGE SENTRY We've 
even built in a filtered cooling fan. Model 10 Comes without 
electronics and is compatible with side mounted fans. 



appleicenter 


Cali or write for additional Information: 

■9 DOSS INDUSTRIES 

1224 Mariposa, San Francisco, CA 94107 (415) 861-2223 

Apple is a registered trade mark of Apple Computer, Ine. 
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until I remembered I had received a 
clock for thè III from an aftermarket 
manufacturer to review. 

The clock setup involves a battery 
pack, so that turning thè III off won’t 
remove thè time and date values. The 
battery compartment is clearly 
marked, showing thè proper orienta- 
tion. However, I decided to instali 
thè kit while watching TV. Three of 
thè four AA cells went in great, but 
thè fourth one, just as I was slipping 
it into thè case, jumped up and 
turned itself around in my hand— 
without my noticing it. You have to 
be careful with batteries; they’re very 
sneaky that way. 

To thè clock manufacturer’s 
credit, thè battery case didn't vvant to 
dose with thè batter}' installed back- 
wards. To thè credit of my own pig- 
headedness, I made it dose. I was 
about to instali thè case in thè III 


Figure 2. RAM diagnostic display indieating 
no problema. 


when I heard thè bubbling noise. It 
took about 250ns for me to realize 
where thè sound was coming from. I 
disconnected thè pack from thè wir- 
ing to thè motherboard (a inaster- 
stroke of design, making a connector 
midway in thè wires!) and opened up 
thè case. My rebellious batter}' had 
paid dearly for its treachery. 

Unfortunately, I paid a little also. 
The analog card on thè internai disk 
drive was wiped out, and thè 
74LS125 on thè outboard drive was 
zapped as well. You thought you 
were thè only person who did things 
like that? Total rcpair price, about 
$71. But imagine what would have 
happened if thè III had been on at 
thè time. 

That surge of churlish voltage 
was probably thè cause of thè green 
stuff, since I hadn’t noticed it be- 
fore and I’d had thè board out at 
least twice. I’ve seen that type of 
residue on tubes in old TV sets that 
have gone up in a cloud of acrid 
fumes. 

Surprisingly enough, when I put 
thè III back together, it worked. 
There were no stray lines and no ver- 
tical rules. I guess that means I fixed 
it, or at least earned myself a 
reprieve. 

Disclaimer 

I want to emphasize again that, 
unless you re familiar with working 
on hardware and know how to be 
careful, don’t dismantle your Apple 
III. There are more than enough 
competent Service persons in thè 
world who know what’s happening 
under thè hood. The Level 1 Service 
centers are authorized to repair your 
machine on a board level. If they find 
a board that doesn’t work, they’ll 
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Figure 4. Bit composition of RAM diagnostic 
display. 


swap it out and charge you good old 
dollars. If you think you can get a 
better deal from Apple directly, ask 
thè dealer to send thè broken ma¬ 
chine on to them for “repair and re¬ 
turn.” Apple will fix it on a time and 
materials basis, which may or mav 
not work out to be cheaper. 

MORE ABOUT RAM 

How often do you turn your III 
on? Once a day? Twice? Did you ever 
wonder what that pattern of dots is in 
thè upper left corner of thè screen? 
It’s a display of thè results of a RAM 
test that triggers ever}’ time your 
machine is turned on. You can also 
induce it by holding down thè open 
appiè and control keys while press¬ 
ing thè reset button. That dumps 
you unceremoniously into thè Ap¬ 
ple III’s monitor. Type F6E6G, press 
return and, Voila!, a RAM diagnostic 
display. 

If everything’s all right, you see all 
dots, as represented in Figure 2. But 
if you have a RAM chip that’s senile, 
one or more of thè dots is replaced by 
an inverse 1 (a black 1 in a white 
box). 

If thè positioning of thè dots in thè 
display corresponded to thè rows and 
columns of RAM in your III, that 
would be even better. 

Look again at Figure 2. Doesn’t 
look like much, does it? Now check 
out Figure 3, thè arrangement of thè 
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Figure 3. Chip arrangement on RAM board. 
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chips on thè RAM board. They don’t 
look similar at all do they? In thè 
display there are 8 rows by 8 columns 
of dots—a total of 64. There are 3 
rows by 16 columns of RAM chips. 
That’s only 48. But, wait a minute! 
The bottom RAM row is made up of 
32K chips, so each counts for two of 
thè 16K variety. Thus, we have thè 
equivalent of 64 RAM chips, even 
though to count there are only 48. 

Also, there are 8 dots across each 
row, And a byte is 8 bits long. But thè 
RAM is arranged in rows of 16 chips. 
Now, suppose thè RAM is arranged 
in rows of 16 bits. Each row of chips 
counts off 8, ending one byte. The 
next one begins where thè first left 
off. Starting with that as a basic pos¬ 
tulate, let’s take another look at our 
RAM test display, this time as it is 
composed of bits. See Figure 4. Since 
thè 32K chips have twice thè capacity 
of thè others, they must account for 2 
rows of thè dot display, and since 
we’ve postulated that each RAM row 
is 16 bits of data, thè row of 32K 
RAM is displayed by 4 rows of dots. 
That leaves 4 rows of dots, which are 
amply represented by thè remaining 
2 rows of RAM chips. If we are right, 
thè only problem now is to associate 
rows of dots with rows of RAM. 

The Apple III hardware bulletin 
confirms our hypothesis, and offers as 
help thè RAM map in Figure 5. 
“Board” refers to thè alphabetic leg- 
end along thè side of thè mother- 
board. B fills two positions because, 
as we mentioned, it’s a row of 32K 
chips. 

Find Figure 6. If our display turned 
up so, we could check our chart in 
Figure 4, see that thè 1 referred to bit 
4 of row 6, then refer to thè hardware 
bulletin RAM map (Figure 5) and 
discover that row 6 was motherboard 


reference B and that bit 4 was thè 
fourth chip in from thè left. That 
chip would have to gol 

That wasn’t so bad, was it? If you 
were practiced at Apple III dissec- 
tion, you could repair your ailing 
machine for thè cost of thè new chip 
and about a half hour of your time. 
Just make sure thè new chip has thè 
same speed rating as thè old. Slower 
chips are a disaster. 

HELP WANTED 
I’d like to ask your assistance with 
thè mail. A lot of you folks are not 
just writing in to teli me you’re enjoy- 
ing this column. You also want an- 
swers! I have two choices in dealing 
with these requests. I can answer in 
this column, which means a time gap 
before you get help. I can also mail 
an answer directly. This option seems 
thè best, but even a multi-decinaire 
(someone who has a few $10 bills ly- 
ing around) could not afford all that 


Figure 6. RAM diagnostic display indicatitig 
a faulty chip. 
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Figure S. RAM map. 









postage. So, if you ask a question that 
needs a speedy reply, keep in mind 
these four magic lettere—SASE (Self- 
Addressed Stamped Envelope). Tuck 
one in with your letter. 

LOOSEENDS 

To that nice pereon in Kansas City: 
No, 99 percent of thè stuff I get Tve 
got to return after I’m done with it. I 
don’t have a neat pile of spare equip- 
ment. There are probably more re- 
viewers than there are fingere and 
toes on all thè inhabitants of Italy, 
Texas. It would be quite costly for thè 
manufacturers to give away that 
much merchandise. 

Don’t feel bad, though. It’s a com¬ 
mon assumption that columnists 
have a stash and a half of freebies. 
Anyway, don’t rush into writing for 
that reason; it’s a good way to go 
broke. 

Time to go. I haven’t yet decided 
what to do for next month’s column. 
It’s a toss-up whether TU think up a 
topic tonight, or go out to my favorite 
Chinese restaurant. (There’s this 
great one in Fort Lee!) Whichever, 
live long and program, and see you 
next time. 

Ciao bene, AppleAmerica! ■ 
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When It comes to 
Flextble Disks, no body 
does it better than 
Wabash. 

MasterCard. Visa Accepted. 
Cali Free: (800) 235-4137 


PACIFIC 

EXCHANGES 

100 Foothill Blvd 
San Luis Obispo. CAI 
93401 (In Cai cali ' 
(8051 543-1037) 
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Hints ’n’ Techniques 


Remark Reminder Made Easy 

by David Schroeder 


R EMSCAN is a relocatable ma¬ 
chine language program that 
displays thè line numbers and thè text 
of Rem statements in an Applesoft 
Basic program. It is useful in thè doc- 
umentation of long and involved Ap¬ 
plesoft programs. REMSCAN must 
be BRun. You can select doublé spac- 
ing of thè list by poking location 
$FC(252) with a 2. 

Looking at thè program, lines 16- 
26 store thè pointer to thè beginning 
of thè Basic program in locations 
$06-07, check spacing and generate 
two carriage returns. Lines 30-35 
check thè second byte of thè tag field 
for zero, which marks thè end of thè 
Basic program. Then REMSCAN 
checks for a $B2, thè code for a REM. 
When found, lines 64-99 take thè 
REM’s binary line numbèr and con- 
vert it to a formatted five-digit BCD 
number. The rest of REMSCAN per- 
forms thè printing of thè in¬ 
forma tion. ■ 


Address correspondence to David Schroeder, 
224 Clark S t., Brockport, NY 14420. 


00010 - * * 'START OF PROG* * * 
05000 - * * ‘DRAW HANDS* * * 
05035 - ***W1PE HANDS*** 

05065 - ***MOVE HANDS*** 
05139 - ***DRAW CLOCK*** 
05400- ***TEXT ON HGR*** 
05500 - ***SPACE ROUTINE*** 
05600 - ***QUIZ INPUT*** 

05700 - ***PROBLEM TEXT*** 

Figure l. Sample output. 






Lifting. Remark Extraction program. 1 

SOURCE FILE: REMSCAN 


-NEXT 

OBJECT FILE NAME IS 

REMSCAN.DBJO 

0300: 



t 


ORG 

*300 




'•) 




0300: 



3 




0300: 



4 


REMARK EXTRACTION ; 

0300: 



5 


PROGRAM ; 

0300 : 



6 



; 

0300: 



7 


BY DAVE SCHROEDER ; 

0300 : 



a 


JUL-Y 1981 ; 

0300: 



9 



; 

0300: 



10 




0300: 



11 




0300: 



12 


STORES POINTERS FOR START OF BASIC PROGRAM 

0300: 



13 


*FC HOLDS 

SINGLE (01) OR DOUBLÉ <02> 

0300: 



14 


SPACE INFORMATION. 

0300 : 



15 




0300:AS 

67 


16 


LDA 

*67 

0302:85 

06 


17 


STA 

*06 

0304:A5 

68 


18 


LDA 

*68 

0306:05 

07 


19 


STA 

*07 

0308:20 

FB 

DA 

20 


JSR 

*DAFB 

030B:20 

FB 

DA 

21 


JSR 

tDAFB 

030E:A5 

FC 


22 


LDA 

*FC 

0310:C9 

02 


23 


CMP 

4*02 

0312:FO 

04 


24 


BEO 

CHECK 

0314:A9 

01 


25 


LDA 

#*01 

0316:85 

FC 


26 


STA 

*FC 

0318; 



27 




0318: 



28 


CHECK TO SEE IF AT THE END 

0318: 



29 




0318:AO 

Ol 


30 

CHECK LDY 

#*01 

031A:B1 

06 


31 


LDA 

(*06 >,Y 

031C:DO 

09 


32 


BNE 

TEST 

031E:20 

FB 

DA 

33 


JSR 

*DAFB 

0321:20 

FB 

DA 

34 


JSR 

*DAFB 

0324:4C 

00 

00 

35 


JMP 

*0000 

0327: 



36 




0327: 



37 


IS IT A REMARK STATEMENT 

0327: 



38 




0327:C8 



39 

TEST INY 


0328:C8 



40 


INY 


0329:C8 



41 


INY 


032A:B1 

06 


42 

TESTI LDA 

<*06>,Y 

032C:FO 

07 


43 


BEO 

NEXT 

032E:C9 

B2 


44 


CMP 

#*B2 

0330:F0 

13 


45 


BEO 

PRTREM 

0332:C8 



46 


INY 


0333:DO 

F5 


47 


BNE 

TESTI 

0335: 



48 




0335: 



49 


NO - SET NEXT LINE 

0335: 



50 




0335:AO 

00 


51 

NEXT LDY 

#*00 

0337:B1 

06 


52 


LDA 

(*06>,Y 

0339:AA 



53 


TAX 


033A:C8 



54 


INY 


033B:B1 

06 


55 


LDA 

<*06>,Y 

033D:85 

07 


56 


STA 

*07 

033F:BA 



57 


TXA 


0340:85 

06 


58 


STA 

*06 

0342:18 



59 


CLC 


0343:90 

D3 


60 


BCC 

CHECK Liiting cimtinued. 
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Daisy wheel quality 
without daisy wheel 
expense. 

You nocd thè quality print that a daisy wheel 
printer provides hut thè thoughr of huying one makes your 
wallet wilt. The Sciatrici'* 1 Interface, n step-hy-step guide to 
interfacing an IBM Selectric I/O Writer to your miiTocom- 
puter, will give voti that quality at a fraction ol thè price. 
George Young, eo-author of Microcomputing magarine’s 
popular “Kilohaud Klassroom" series, offers a low-eost al¬ 
ternative to huying a daisy wheel printer. 

The Selectric™ Interface includes: 

• step-hy-step instructions 

• tips on purchasing a used Selectric™ 

•information on various Selectric 7 -'- models, in- 

cluding thè 2740, 2980, and Dura 1041 

• driver software for ZSO, 8080, and 6502 chips 

• tips on interfacing techniques 

With The Selectric Interface and some background in elee- 
tronics, you can bave a high-quality, low-cost, letter-quali- 
ty printer. Petals not included. 

Credit card orders cali TOLL-FREE 1-800-258-547 h Or 
mail your order with payment plus $1.50 shipping and 
handling to: Wavne Green Ine. Attn: Retail Book Sales, 
Peterborough, NH 05438. 

Dealer inquiries invited. ^ . _ _ _ 

ISBN 0-88006-051-4 128 pages 1 Z . S) 7 

U Yes, I want Selectric Interface (BK7 Ì8H). Enclosed is $12.47 per 
copy plus $1.50 for shipping and handling. 

Z MASTER Z VISA ZAMEX 

Card 0 _Expires_ 

Signature ________ 


Statistica! 

Software 

ELF and TWG/ARIMA statistica! software 


For Apple and CPEM 

□ factor analysis □ discriminant analysis □ stepwise 
regression with residuals and forecasting □ crosstabs 

□ uses Basic commands for transformations □ hi-res 
scattergram □ means, standard deviations, etc. . 

□ correlation coefficients □ 1 and 2 way ANOVA É 

□ report writer □ t-test on f 

means □ database manager f 


TWG/ARIMA 


For Apple 


□ Box-Jenkins package 

r f] seasonal and non-seasonal models 

□ Box-Cox transformations □ identification, 
estimation and forecasting □ statistics, 

SSE grid, confidence intervals, etc. 

□ database manager 

Visa and Master Charge accepted. Cali or write for information: 

THE WINCHENDON GROUP 

3907 Lakota Rd. PO Box 10114 Alexandria, VA 22310 
1-800-431-1953 x831 1-800-942-1935 x831 (in New York; 


Circle 57 on Reader Service card. 


State and Zip_ 

All orders shippcd UPS if completo Street address is giveci, 


335B5S 


A FUNCTI0NAL, C0MF0RTABLE 
V™ ‘ APPLE II COMPUTER STATION 

THE PROBLEM: 

p s=3 fL AN ACHING BACK RESTINO 0N A TIRED " *" REDUCES 
NI V0UR PRODUCT'VITY CREAT : VITY AND ENJ0YMENT 

UP THE SOLUTION: 

gP— _ 0a*€ErriFOOT n 

iMtag DESIGNED BY A DEDICATED 

COMPUTER H0BBYIST, IT 
P0SITI0NS THE KEYB0ARD AT A 
RT HEIGHT THAT REDUCES FATIGUE 

AND ACHES OF THE LOWER BACK 
AND SHOULDERS WITH DISK DRIVES 
^ND CRT IN PLACE THERE ARE AB0UT 
TW0 SQUARE FEET (15" X 25”) 0F 
WORK AREA DIRECTLY IN FRONT 0F 
YOU FOR READ'N AND WRIT'N. 
CONSTRUCTED 0F ALL WOOD FURNITURE 
QUALITY PARTICLE BOARD AND FINISHED IN 
WOODGRAIN (WALNUT OR 0AK) HIGH PRESSURE 
MICA LAMINATE, BASIC COMFORT II IS RUGGED (70 LBS.) T0 ORDER 
OR INQUIRE PHONE 1-800-874-3514 
IN FLORIDA CALLCOLLECT (904) 252-7970. 

$169.00 P! US ShiPPiV,. m.RIS adii ÌIIkÌIIÉ 1 

Hill v ASStMBltD ^ 1 

PICTURE HOUSE — 

BASIC COMFORT II COMPUTING PRODUCTS 

166 BOYNTON BLVD., DAYTONA BEACH, FL 32018 

APPLE II APPLE AHI HEC, IRADEMARK 111 APPIÈ OjMPLIIEH OIMPANV 
CUPY RIGHI tasi PII.IURE HOUSE Al, RHiHIS RESI-l/t0 
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Circle 6 on Readec Service card. 


Extra Special! 

Base II [Req. - 

Z-80) 


$449.46 


r/Ece^ 



$1.00 credit lor all phone orders over $100.00 

LIST PRICE $29.95 • 

OUR PRICE $22.16 I 

Micro Cookbook 

Flip Out 


Micro Barmate 

Spectre 


Limar Leeper 

Rhymes & Riddles 

LIST PRICE $34 95 • 

OUR PRICE $25.86 

Face Maker 

Story Machine 

Frogger 

Choplifter 


Sea Dragon 

Knight of Diamonds 

AE 

Bolo 


LIST PRICE $39.95 • 

OUR PRICE$29.56 

Stickybear Numbers 

Zaxxon 


Stickybear ABCs 

Dark Crystal 


Stickybear Bop 

1 ype Attack 


Old Ironsides 

Algebra 1.2.3. or 4 

Mask of thè Sun 

Miner 2049'er 

Serpent's Star 

Legacy of Llygamym 


LIST 

OURS 

Arcade Machine 

. 59.95 - 

44.36 

BagofTricks 

. 39.95 - 

29.56 

Bank Street Writer 

. 69.95 - 

51.76 

Chess (Odesta) 

69.95 - 

51.76 

Delta Drawìng . ; . 

. 59.95 - 

44.39 

General Manager 

.229.95 - 

170.16 

Gratorth . 

75 00 - 

55.49 

Graphics Magician 

. 59.95 - 

44.36 

G.P.L.E. 

. 64.95 - 

48.06 

Krell S.A.T. 

299.95 - 

254.96 

Krell Logo. 

89.95 - 

76.46 

Lisa Ed. System . 

119.95- 

88.76 

Magic Window II ... 

149.95 - 

110.96 

Maxell Disks (10) . 

. 55.00 - 

31.00 

Micro Mother Goose 

39.95 - 

29.56 

Nibbles Away II ... . 

. 69.95 - 

51.76 

Quick Code (req. Z-80) 

.295.00 - 

218.19 

Rocky's Boots. 

75.00 - 

55.49 

S.A.M. 

.124.95 - 

92.46 

Screenwriter II . 

.129.95 - 

96.16 

Screenwriter Pro. 

199.95 - 

147.96 

SensibleSpeller ... 

125.00 - 

92.49 

1 16K Ram Card (Microsoft) . 99.95 - 

77.96 

Snooper T roops 1 or 2 

44.95 - 

33.26 

StepbyStepll . 

79.95 - 

59.16 

System Saver Fan . 

. 89.95 - 

76.46 

TASC Compiler . 

.175.00 - 

129.49 

The Artist . 

. 79.95 - 

59.16 

Wizardry . 

. 49.95 - 

36.96 

Word Handler. 

.199.00 - 

147.26 

Zoom Grafix 

. 39.95 - 

29.56 

SPECIALS 


Multiplan (CPM or DOS) .275.00 • 

198.46 

Wildcard . 

.139.95 - 

111.19 

Home Accountant 

. 74.95 - 

52.46 

T.G.TrakBall 

. .. 64.95 - 

44.96 

Microbe . 

., . 44.95 - 

34.96 

Ultimali . 

. 59.95 - 

41.96 

Pinball Construction Set _ 39 95 - 

28.56 

Ic.O.D. • Money Orders • 

Dertified Checks 

Personal 

1 Checks Allow 2 Weeks • N.Y.S. Res. Add Sales Tax 1 

U.S.-Orders Under $150. Add $2.00 P&H 

AH Canadìan, U.S. 

Funds $3.00 P&H I 

1 P— Foreiqn. Charqes Only. Min. P&H $6.00 1 

• SEND FORFREE PRICE LIST *300 • 

Source TCP637 


|BYTES & PIECES (516)751-25351 

| Box 525 Dept. J • E. 

Setauket. N.Y. 11733 | 
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Listing continued. 


0345: 



61 

5 



0345: 



62 

; SET LINE NUMBER AND 

0345: 



63 

s 



0345:84 

1B 


64 

PRTREM 

STY 

*1B 

0347:AO 

03 


65 


LDY 

#*03 

0349:B1 

06 


66 


LDA 

<*06),Y 

034B: 85 

09 


67 


STA 

*09 

034D.-8B 



68 


DEY 


034E:B1 

06 


69 


LDA 

<*06),Y 

0350:85 

08 


70 


STA 

*08 

0352:. A9 

09 


71 


LDA 

#*09 

0354:85 

19 


72 


STA 

*19 

0356:A9 

00 


73 


LDA 

#*00 

0358:85 

1A 


74 


STA 

*1A 

035A:BD 

00 

02 

75 


STA 

*200 

035D:8D 

01 

02 

76 


STA 

*201 

0360:8D 

02 

02 

77 


STA 

*202 

0363:F8 



78 


SED 


0364:A2 

00 


79 

CONVERT 

LDX 

#*00 

0366:Al 

19 


80 


LDA 

<*19,X) 

0368:2A 



81 

CONVERTI ROL A 

0369:48 



82 


PHA 


036A:AO 

02 


83 


LDY 

#*02 

036C:B9 

00 

02 

84 

DOUBLÉ 

LDA 

*200,Y 

036F:79 

00 

02 

B5 


ADC 

*200,Y 

0372:90 

02 


86 


BCC 

DOUBLÉ1 

0374:29 

7F 


87 


AND 

#*7F 

0376:99 

00 

02 

88 

DOUBLÉ1 

STA 

*200,Y 

0379:88 



89 


DEY 


037A:10 

FO 


90 


BPL 

DOUBLÉ 

037C.-6B 



91 


PLA 


037D:E8 



92 


‘ 1 NX 


037E:£0 

08 


93 


CPX 

#*08 

0380:DO 

E6 


94 


BNE 

CONVERTI 

0382:C6 

19 


95 


DEC 

*19 

0384 :A9 

07 


96 


LDA 

#*07 

03EI6: C5 

19 


97 


CMP 

*19 

0388:DO 

DA 


98 


BNE 

CONVERT 

03BA:DS 



99 


CLD 


038B : 



100 

5 



038B: 



101 

; *200- 

*202 

HOLDS LINI 

038B: 



102 

; PRINT 

IT, 

A DASH, Al 

038B: 



103 

5 



038B:18 



104 


CLC 


038C:90 

02 


105 


BCC 

PRINT 

038E:FO 

A5 


106 

STEP 

BEQ 

NEXT 

0390:AD 

00 

02 

107 

PRINT 

LDA 

*200 

0393:69 

BO 


108 


ADC 

#*80 

0395:20 

ED 

FD 

109 


JSR 

*FDED 

0398 : AD 

01 

02 

110 


LDA 

*201 

039B:AE 

02 

02 

111 


LDX 

*202 

039E: 20 

41 

F9 

112 


JSR 

*F941 

03Al : 20 

57 

DB 

113 


JSR 

*DB57 

03A4:A9 

AD 


114 


LDA 

#*AD 

03A6:20 

ED 

FD 

115 


JSR 

*FDED 

03 A9: 20 

57 

DB 

116 


JSR 

*DB57 

03AC:38 



117 


SEC 


03AD:A5 

06 


118 


LDA 

*06 

03AF; 65 

1B 


119 


ADC 

*1B 

03B1: 85 

19 


120 


STA 

*19 

03B3:A5 

07 


121 


LDA 

*07 

03B5:69 

00 


122 


ADC 

#*00 

03B7:85 

1A 


123 


STA 

*1A 

03B9:AO 

00 


124 


LDY 

#*00 

03BB:B1 

19 


125 

TEXT 

LDA 

<*19),Y 

03BD:FO 

08 


126 


BEQ 

LINE 

03BF: 09 

80 


127 


ORA 

#*80 

03C1:20 

ED 

FD 

128 


JSR 

*FDED 

03C4:C8 



129 


INY 


0305:DO 

F4 


130 


BNE 

TEXT 

03C7:A6 

FC 


131 

LINE 

LDX 

*FC 

03C9:20 

FB 

DA 

132 

LINESP 

JSR 

4DAFB 

03CC:CA 



133 


DEX 


03CD:DO 

FA 


134 


BNE 

LINESP 

03CF:FO 

BD 


135 


BEQ 

STEP 


#** SUCCESSFUL ASSEMBLY: NO ERRORS 








































KNIGHT OF DIAMONDS ... Jl 
THE SECOND SCENARIO 

The characters with whom you 1 
fought through to thè 10th level in I 
“Proving Grounds" must now cali upon I 
every ounce of resourcefulness to save I 
thè City of Llylgamyn. In fact, they 
must bave reached thè 13th level of I 
power merely to survive! 

The same high resolution, 3-dimen- 
sional visual effects that thrilled you in 

■and more. • 


thè first scenario are here 
'Knight of Diamonds," so eagerly antic- 
ipated by Wizardry players everywhere, 
surpasses highest expectations for 
story, action and complexity. 

If successful, you will return thè 
enchanted staff of Gnilda to Llylgamyn 
and become thè Knight of Diamonds. 
but formidable adversaries block you 
at every turn. To begin your quest, 
simply place yourself under thè speli 
of Wizardry *. 


AFaniasy Rote-Piaying Simuhtion 

Copyright { 1982 by Andrew Grcenberg, Ine 
and Robert Woodhead. Ine. 


THE LEGENDARY FANTASY 
ROLE-PLAYING SIMULATION 

. . . In "Proving Grounds of thè Mad 
Overlord" you begin a challenging and 
totally absorbing journey through a 10- 
level, 3-dimensional maze. Create, then 
command, a hearty band of up to six 
adventurers who all must cooperate to 
explore a deep and mysterious maze in 
search of loot and glory. 

The mages cast spelisi thieves plot 
to steal treasure; and warriers battle 
thè monstrous fiends of thè under- 
world. In Wizardry®, no one remains 
unchanged; each member of thè party 
grows in age, experience and, you 
hope, wisdom. 

The puzzles, passageways and per- 
sonalities in "Proving Grounds" have 
already fascinated and astounded thè 
k computer world and created a dedi- 
Igi cated following of players. Find out 
why—place yourself under thè 
speli of Wizardry®. 


ALL SOFTWARE AVAILABLE FOR THE APPLE AND IBM PC AT YOUR FAVORITE RETAILER 


SOFTWARE THAT COMPLIMENTS YOUR INTELLIGENCE 

6MAIN STREET 
li OGDENSBURG. N.Y. 13669 
il (315) 393-6633 


SOFTWARE INC. 


Apple is a registered trademark of Apple Computer, Ine. IBM is a registered trademark of International Business Machines Wizardry is a registered trademark of Sir-tech Software. Ine. 

Circle 218 on Reader Service card. 







































Hints V Techniques 


0 REM BINARY TRANSFER UTILITY 
10 REM WRITTEN BY MARC BAIME 
20 REM 52-08 FOX RUN DRIVE 
30 REM PLAINSBORO,NEW JERSEY 
40 REM 08536 

45 HOME 

50 PRINT "THIS IS A UTILITY THAT WILL TRANSFER A” 

60 PRINT "BINARY FILE FROM ONE DISK TO ANOTHER." 

70 PRINT "IT WILL TELL YOU THE BLOADED LOCATION" 

75 PRINT "OF THE FILE AND THE LENGTH OF THE FILE." 

77 PRINT "*##*##*#*#**#******#*#***#*##***#*#*#*' , 

80 PRINT "AFTER THE FILE HAS BEEN LOADED THE PRO-" 

90 PRINT "GRAM WILL ASK FOR A NEW FILE NAME AND" 

100 PRINT "AFTER YDU ENTER THE NEW NAME, THE FILE" 

110 PRINT "WILL BE SAVED UNDER THAT NEW NAME." 

120 PRINT "**************************************" 

130 PRINT 
140 PRINT 
150 PRINT 

160 INVERSE : PRINT "TO CONTINUE PRESS ANY KEY!" 

170 NORMAL 
190 GET CO* 

200 HOME 

210 PRINT "PLEASE ENTER THE NAME OF THE FILE THAT" 

220 INPUT "YOU WOULD LIKE TO TRANSFER. "; FILE* 

225 IF LEN (FILE*) = O THEN GOTO 210 
230 PRINT CHR* <4);"M0N 0,1,0" 

240 PRINT CHR* <4>;"BLOAD "; FILE* 

250 HI = PEEK (43635)sLl = PEEK (43634) 

260 LET FLQC = ((HI * 256) + LI) 

265 H2 » PEEK (43617)sL2 - PEEK (43616) 

267 LET LE = (<H2 * 256) + L2) 

270 PRINT "FILE FLASH : PRINT FILE* 

275 NORMAL 

280 PRINT "LOCATED AT DECIMAL LOCATION ";FLOC 
320 PRINT "THE LENGTH OF THE FILE IS " 

330 PRINT "DECIMAL "; LE 
340 PRINT 

350 PRINT "PLEASE TYPE THE NAME OF THE NEW FILE" 

360 PRINT "IN WHICH YOU WOULD LIKE TO SAVE THIS" 

370 PRINT "FILE AND PRESS RETURN. IF YOU DON'T" 

375 INPUT "WANT TO CONTINUE JUST PRESS RETURN. ";NFILE* 

377 IF LEN (NFILE*) = 0 THEN PRINT CHR* (4);"NOMON C,I,0": HOME : PRINT 
"BYE-BYE!": END 

380 PRINT CHR* (4);"BSAVE NFILE*;",A"FLOC",L"LE 
385 PRINT CHR* (4)5"NOMON C,1,0" 

390 PRINT "YOUR BINARY FILE HAS BEEN SAVED UNDER" 

400 PRINT " IT’S NEW NAME. " 

410 END 


PEEK (43634) 
+ Li) 

PEEK (43616) 


Listing 1. BTU. 


cation and length of thè file. 

• 350-375 prompts you for a new file 
name to save thè file under. The new 
file may be stored on thè same disk or 
on a new disk. At this point you could 
place a new disk in your drive. If you 
decide that this file is not worth thè 
effort of saving, you can simply press 
return. 

• 377 notes that you have entered no 
file name; i.e. NFILE$ has a length 
of zero, and thè program is ended. 

• 380 BSAVEs your file if you enter a 
file name. 

• 385 shuts off input-output mon¬ 
itoring. 

• 390-410 prints out a good-bye 
message and ends thè program. 

If you have a 32K Apple or a 16K 
Apple, lines 250 and 265 in thè pro¬ 
gram will need to be changed. 
Change thè following lines on a 32K 
machine: 

250 HI = PEEK (27251); LI = PEEK (27250) 
265 H2= PEEK (27233); L2= PEEK (27232) 
A 16K Apple will need thè follow¬ 
ing changes: 

250 HI = PEEK (10867); LI = PEEK (10866) 
265 H2= PEEK (10849): L2= PEEK (10848) 


file location high byte, and thè deci¬ 
mai value of thè low byte is added to 
it. (Variable FLOC then contains thè 
decimai location of thè file.) 265 and 


267 perform thè same type of opera- 
tion to obtain thè decimai length of 
thè file. 

• 270-340 prints out thè decimai lo- 


Perhaps you can think of some 
ways to improve thè BTU program. I 
hope you find this utility makes tak- 
ing a byte out of your Apple much 
easier. ■ 


A-(Hex)Hunting We Will Go! 

by David Schroeder 


Program Listing. Hex-Asc Dump. 

SOURCE FILE: HEX-ASC 

- NEXT OBJECT FILE NAME IS HEX-ASC.OBJ0 

0300: 1 ORG *300 

0300: 2 ; 

0300: 3 ;HÉX—ASC DUMP 

0300: 4 ; 

0300: 5 ; BY 

0300: 6 ; 

0300: 7 ; DAVID SCHROEDER 

0300: 8 ; 

0300: 9 ; 

0300: 10 ;THIS PROGRAM WILL ALLOW 

Listing cuntinued. 


W elcome to thè Apple Island 
Monitor Safari! Today’s 
challenging hunt involves hacking 
our way through a jungle of numbers 
to find an elusive DOS command 
table. Ready. Set. Go! 

Dove Schroeder Works as a Systems engineer. 
His non-projessional interests include music, 
electronics, math puzzles and numbers. Address 
correspondence to him at Williamstowne 
Court, Apt. 6, Cheektowaga, NY14227. 
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Circle 11 on Reader Service card. 


ecial Cm£l 



160 cps 

Unlimited character" 
or Symbol selection 
9 x 11 matrix 
256 characters can be 
stored in RAM 
80 cps Office Quiet Mode 
Emphasized, condensed, proportional, 
elite, italic, etc. 

MX 80 
MX 80 F/T 
MX 100 F/T 


/ Okldatii 

82A 10"120cps s 424 95 
83A 15"120cps s 664 95 
84 15"200cps s 994 9i 

92 10"160cps ! 519 95 

93 15"160cps s 879 95 


Gemini 10" 
Gemini 15" 


ProwriterlO" s 449” 
Prowriter 15" s 669 9i 



2K, 16cps 


Practical Peripheratè\ 

Microbulfers 

- n 

16K 

s 199 8s 

32K 

s 234 85 

32K In Line 

s 234 85 

64K In Line 

s 299 85 

Saitrm 

: : 

32 K RAM 

184" 

64 K RAM 

s 299 85 

128 K RAM 

s 409 95 

Geapble Board'. 

t | 

Grappier li + 

s 135 95 

PKASO 

s 135 !s 

PKASOIDS 

s 145 96 

Wizard IPI 

s 69 95 

Graphilti 

s 99 95 

OC Mayes - ■ 


Smart 300 

s 219 95 

Smart 1200 

s 519 95 

Micromodem 11 s 279 8s 

Micro II w/Term s 314 85 

Ho trattoli 


Apple Cat 300 

269 9 ‘ 

Apple Cat 1200 

s 579” 

Auto Cat 300 

s 219 95 

Auto Cat 1200 

s 569 9s 

Cat 

s 154 9s 

D Cat 

s 149 95 

J Cat 

s 134 96 

; Arndek 

300G12" 

s 159 95 

300 A 12" 

s 164 95 

Colori LowRes 

s 3 29«5 

Color2 Hi Res 

571995 

Color3MedRes s 429 8! 

USI 


PI 1 9"G 

s 139 95 

PI 2 12"G 

s 159 9! 

PI 3 12"A 

s 164 95 

PI 49"A 

s 159 95 


Softcard Pr/Sys s 459 95 
Softcard Plus '428*’ 
Z80 Softcard s 234 9! 
16K RAMcard s 89 9! 
mis 

CP/M Card, 64K 
RAM, 6mhz s 309 9i 
Smarterm II, 80 
column card S 144 ,S 

O uadram 

MicrotazerPrintBuffers 


Elite 1 163 KB s 299 95 
Elite 2 326 KB s 469 9s 
Elite 3 652 KB s 659 95 
Controller s 99 95 
Fmnklm 


8K 

s 144 9s 

16K 

s 164 95 

32 K 

s 184 9s 

64K 

s 219 9s 

128K 

s 279 95 



ACE 1000, Drive, 
Color, 64K s 1399 85 
ACE 1200, Drive, 
Color, 128K S 1749 95 


We also carry Mountain, Corona, NEC, Diablo, 
Qume. Anadex, Microsci, Vista, Videx, Corvus 



BUSINESS 

COMPUTERS 

OF PETERBOROUGH 


12 School Street • Peterborough, NH 03458 

v (603) 924-9881 Free Shipping j 
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Listine continued ,. 







0300: 



11 

: THE USER TD 

SEE BOTH THE 

0300: 



12 

;HEX AND ASCII REPRESENT- 

0300: 



13 

; ATIONS 

OF CORE IN B BYTE 

0300: 



14 

:CHUCKS. 

WHEN ’BRUN' IT 

0300: 



15 

;SETS UP THE 

CTRL-Y FEATURE 

0300 : 



16 

;OF THE 

MONITOR. THE PROGRAM 

0300: 



17 

;IS RELOCATABLE AND REQUIRE5 

0300: 



18 

;ONLY 166 BYTES OF MEMORY. 

0300: 



19 

5 



003C : 



20 

A1L 

EQU 

$3C 

003D: 



21 

A1H 

EQU 

*3D 

003E: 



22 

A2L 

EQU 

$3E 

003F: 



23 

A2H 

EQU 

*3F 

0060 : 



24 

T1L 

EQU 

*60 

0061: 



25 

T IH 

EQU 

*61 

0062 : 



26 

T 2 L 

EQU 

$62 

0063: 



27 

T2H 

EQU 

*63 

FDED : 



28 

COUT 

EQU 

*FDED 

F94C: 



29 

RRBL3 

EQU 

*F94C 

FDA3: 



30 

XAM 8 

EQU 

SFDA3 

03F8: 



31 

CTL. Y 

EQU 

*03F8 

03F9: 



32 

VECTLO 

ÉQU 

$03F9 

03FA: 



33 

VECTHI 

EQU 

$03FA 

COOO : 



34 

KEYBRD 

EQU 

*cooo 

COIO: 



35 

KYSTRB 

EQU 

SCOIO 

0300: 



36 

5 



0300: 



37 

; SET UP 

THE 

JUMP FOR THE 

0300: 



38 

;CTRL-Y. 

IF 

YOU SET UP 

0300: 



39 

; Al AND 

A2 THEN YOU CAN 

0300: 



40 

;JUMP TO THE 

REAL START 

0300: 



41 

; 



0300:A9 

4C 


42 


LDA 

#*4C 

0302:8D 

F 8 

03 

43 


STA 

CTL. Y 

0305:A9 

60 


44 


LDA 

#*60 

0307; 85 

06 


45 


STA 

*06 

0309:20 

06 

00 

46 


JSR 

*0006 

030C:BA 



47 


TSX 


030D:CA 



48 


DEX 


03DE: 86 

06 


49 


STX 

*06 

0310:AO 

01 


50 


LDY 

#*01 

0312:84 

07 


51 


STY 

*07 

0314:AO 

00 


52 


LDY 

#*00 

0316:EU 

06 


53 


LDA 

( *06) , Y 

0318:AA 



54 


TAX 


0319:C8 



55 


INY 


031A:B1 

06 


56 


LDA 

($06) , Y 

031C:8D 

FA 

03 

57 


STA 

VECTHI 

031F:SA 



58 


TX A 


0320:18 



59 


CLC 


0321:69 

21 


60 


ADC 

#*21 

0323:8D 

F9 

03 

61 


STA 

VECTLO 

0326:90 

03 


62 


BCC 

RETURN 

0328:EE 

FA 

03 

63 


INC 

VECTHI 

032B:60 



64 

RETURN 

RTS 


032C: 



65 

; 



032C: 



66 

5 SAVE ADDRESSES FROM 

032C: 



67 

3 THE CTRL-Y 


032C: 



68 




032C: 



69 

3 REAL PROGRAM 5TARTS HERE 

032C: 



70 

; 



032C:A5 

3E 


71 


LDA 

A2L 

032E:85 

62 


72 


STA 

T2L 

0330:A5 

3F 


73 


LDA 

A2H 

0332:85 

63 


74 


STA 

T2H 

0334:A5 

3D 


75 


LDA 

A1H 

0336:85 

61 


76 


STA 

T1H 







Listing continued. 


Well, if you’re like me, hex digito display to include not only thè hex- 
start looking thè same after thè first adecimai value of each location, but 
hundred scroll by on thè screen. also ito ASCII equivalent. Non- 
Instead of hand-scanning thè cells printables and control codes are 
for a keyword, a small program displayed as periods. 
could be written to search memory I chose this approach because it 
for it. I, however, adopted thè ap- lends itself easily to application in 
proach of extending thè monitor other projecte, such as manual repair 
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Hints ’n’Techniques 


Lifting continued. 


0338: 

A5 

3C 


77 


LDA 

A1L 

|MAKE LOW BYTE A 

033A: 

29 

F8 


78 


AND 

#*F8 

(0 OR AN 8 

033Cr 

85 

60 


79 


STA 

T1L 

033EI 

A5 

60 


80 

LOOP 

LDA 

T1L 


0340: 

85 

3C 


81 


STA 

A1L 


0342: 

A5 

61 


82 


LDA 

T1H 


0344: 

85 

3D 


83 


STA 

A1H 


0346: 

20 

A3 

FD 

84 


JSR 

XAMB 


0349: 




B5 

P 




0349: 




86 

j AFTER 

DISPLAYINS THE 


0349: 




87 

(8 LOCATIONS 

TAB TO 


0349: 




88 

;COLUMN 

30 FOR ASCII 


0349: 




89 

5 




0349: 

A9 

1D 


90 


LDA 

#«1D 


034B: 

85 

24 


91 


STA 

«24 


034D: 

A9 

BA 


92 


LDA 

#«BA 


034F: 

A2 

02 


93 


LDX 

#02 

fPRINT A COLON 

0351: 

20 

4C 

F9 

94 


JSR 

PRBL3 

; AND A SPACE 

0354: 

AO 

00 


95 


LDY 

#00 

0356: 

B1 

60 


96 

DISP 

LDA 

(T1L),Y 


0358: 

10 

OA 


97 


BPL 

PRINT 


035A: 

29 

60 


98 


AND 

##60 


035C: 

DO 

04 


99 


BNE 

SETCH 


035E: 

A9 

AE 


100 


LDA 

#*AE 


0360: 

DO 

02 


101 


BNE 

PRINT 


0362: 

B1 

60 


102 

8ETCH 

LDA 

(T1L),Y 


0364: 

20 

ED 

FD 

103 

PRINT 

JSR 

COUT 

;PRINT OUT ASCII 

0367: 

CB 



104 


INY 



0368: 

98 



105 


TYA 



0369: 

C9 

08 


106 


CMP 

#08 


0368: 

DO 

E9 


107 


BNE 

DISP 


036D: 




108 

5 




036D: 




109 

P 




036D: 




110 

; NERE WE CHECK FOR A KEY 

036D: 




111 

;PRESSED. IF ITS A CTRL-S 

0360: 




112 

; DON'T 

READ 

IT. IF IT 

’S A 

036D: 




113 

t CTRL—C 

THEN 

ABORT. ALL 

036D: 




114 

;OTHERS 

FAIL 



036D: 




115 

P 




036D: 




116 





036D: 

AD 

00 

CO 

117 


LDA 

KEYBRD 


0370: 

C9 

93 


118 


CMP 

#*93 

,-A CTRL-S 

0372: 

FO 

07 


119 


BEO 

CONTIN 


0374: 

C9 

83 


120 


CMP 

#*83 

; A CRTL-C 

0376: 

8D 

10 

CO 

121 


STA 

KYSTRB 


0379: 

FO 

1C 


122 


BEQ 

DONE 


037B: 

EA 



123 

CONTIN 

NOP 



037C: 




124 

? 




037C: 




125 

|INCREMENT LINE POINTER 

037C: 




126 

|UP BY 

8 MEMORY LOCATIONS 

037C: 




127 

; 




037C: 

18 



128 


CLC 



0370: 

A9 

OB 


129 


LDA 

#08 


037F: 

65 

60 


130 


ADC 

T1L 


0381: 

85 

60 


131 


STA 

T1L 


0383: 

90 

OA 


132 


BCC 

LPCHK 


0385: 

18 



133 


CLC 



0386: 

A5 

61 


134 


LDA 

T1H 


0388: 

69 

01 


135 


ADC 

#01 


03BA: 

B5 

61 


136 


STA 

T1H 


038C: 

90 

01 


137 


BCC 

LPCHK 


038E: 

60 



138 


RTS 



038F: 




139 

s 




038F: 




140 

|CHECK 

TO SEE IF WE 


038F : 




141 

; ARE FINISHED YET 


038F : 




142 

| 




03BF: 

A5 

63 


143 

LPCHK 

LDA 

T2H 


0391: 

C5 

61 


144 


CMP 

T1H 


0393: 

FO 

03 


145 


BEQ 

LPCK2 


0395: 

BO 

OC 


146 


BCS 

L00P1 


0397: 

60 



147 

DOME 

RTS 



0398: 

18 



148 

LPCK2 

CLC 



0399: 

A5 

62 


149 


LDA 

T2L 


039B: 

09 

07 


150 


ORA 

#07 


039D: 

C5 

60 


151 


CMP 

T1L 


039F: 

FO 

02 


152 


BEQ 

LOOP1 


03Al : 

90 

F4 


153 


BCC 

DONE 


03A3: 

18 



154 

LOOP l 

CLC 



03 A4: 

90 

98 


155 


BCC 

LOOP 



*#* SUCCESBFUL ASSEMBLY: NO ERRORS 


of Basic programs that have crashed 
without backup. After setting it up 
using thè BRun command, it lies dor- 
mant until I am ready to use it. 

The program, dubbed HEX-ASC, 
is written in machine code and is 
completely relocatable. It is veiy 
small and requires only 165 bytes of 
memory to operate. 

When thè program is BRun, it sets 
up thè control-Y vector. Then, after 
entering thè monitor (CALL-151), 
you use it by employing thè monitor’s 
control-Y feature. The following ex- 
ample shows how to get thè mixed 
display for thè memory range $300 
through $380. 

]CALL -151 

•300.380[CTRL-Y][ RETURN] 

If you want to stali thè scrolling to 
avoid long unwanted memory scans, 
use control-S, and then any key, ex- 
cept control-C, to start it again. In 
this way you can abort thè listing at 
any time. 

The most important feature of thè 
code is its relocatability. Lines 44-64 
are thè key to this feature, as they cal- 
culate and stare thè address of thè 
start of thè routine in VECTHI and 
VECTLO, which in this case is thè 
monitor control-Y jump vector. This 
routine puts a return in thè zero page, 
jumps to it, and picks off thè address 
of thè next executable opcode (minus 
1) from thè stack. 

Lines 71-84 set up thè monitor cali 
to print out thè hex values pf thè first 
eight locations. The ASCII section is 
printed out by lines 90-107. The key- 
board is monitored in lines 117-123, 
and thè rest bandies looping and ex- 
iting condi tions. 

By thè way, if you want to find thè 
DOS command tables, try thè fol¬ 
lowing commands from thè monitor. 

•6880.6908[CTRL - Y]{ RETURN] 

(32K Apple 11 + ) 

< A880. A908(CTRL - Y][RETURN] 

(48K Apple 11 + ) 

I am sure you will find this pro¬ 
gram useful as you dig through your 
Apple’s memory. I would be interest- 
ed in hearing from other users how 
they have used this routine or devel- 
oped other patches to thè monitor. 
Happy Hunting! ■ 
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The Cosmic Balance 

A re you tired of shoot ’em up, 
fast-action arcade gamcs? Are 
you ready for a game that requires 
some reai thinking and planning? 
Cosmic Balance places you complete- 
Iv in charge of a single ship or fleet of 
space ships; as a matter of faet, you 
design each ship from thè ground up. 
In this way, every game can be 
different. 

Cosmic Balance offers thè option 
of two-player or solitaire modes. In 
thè latter, your Apple takes charge of 
thè opposing ship or fleet. At thè start 
of each game, you may select one of 
six possible scenarios, each with a dif¬ 
ferent mission and type or number of 
opponcnts. The first, Dccpspace En- 
counter, pits your ship, thè Enter¬ 
prise, against thè starship Reliant. 
This is probably thè best scenario to 
start with because both ships have 
been createci for you. 

All other scenarios have three 
phases you must perforili. In thè Set¬ 
up phase, you must eitlier design 
your ship(s) or select pr e violisi y saved 
ones from thè disk. After indicating 
thè technological level of your ships 
(i.e., how advaneed thè weaponry is) 
and seleeting thè size of each, you 
must outfit them with engines, pro- 
tective armor, marin&s, etc. Finally, 
you instali weapons around thè pe- 
rimeter of each ship and indicate thè 
speeifie 45-degree arcs or angles that 
each will cover. 

The amount of each option you se¬ 
lect depends primarily on thè space 
you have left in thè ship. Once this 
space has been exhausted, you may 
reduce any of your previous alloca- 
tions in order to build up other ne- 
glected areas of thè ship. Building an 
effeetive, battle-worthy .ship will re- 
quire some practice. (The program 
does show an efficiency rating while 
you are designing each ship, and 
that helps.) 

Once all ships have been designed 
or selected from thè disk, play begins, 
The remainder of thè action is divid- 
ed into thè orders and thè execution 
phases. In thè orders phase, you issue 
commands that will be carried out 


for thè next 16 seconds. You may 
change your ships course and speed, 
recharge depleted shields, launch 
fighters, charge and fire weapons, 
or learn about thè course of your op¬ 
ponenti) . 

Weapons may be set to fire in three 
ways: when thè target is within a 
specified range, when a particular 
second of thè turn is reached (1-16), 
or at thè last instant—thè optimal 
distance within thè weapon’s are of 
fire. The target for each weapon 
must also be indicated. 

This process must be completed for 
each ship in thè fleet. When you are 
through, thè execution phase com- 
mences. Y’ou indicate which ship will 
be centered in thè screen and thè 
scale (0-5) of thè map on which thè 
action will be displayed. The turn is 
shown on thè hi-res screen, and as 
each weapon is fired, thè execution 
pauses and you are told w'hether your 
ship hit its target and how much 
damage it eaused. At thè end of the 
turn, you rc-enter the orders phase 



again and play continues. 

The game ends when one of the 
players is destroyed, one eseapes the 
battio space, or the time limit is 
reached. At the end of each game, 
points for each side are awarded ac- 
cording to performance, and you are 
allowed to examine any of the surviv- 
ing ships. If you wish, Cosmic Bai- 
ance also lets you save gamcs in prog¬ 
ress at any time. 

Cosmic Balance offers an amazing 
degree of control over the ships. Ef¬ 
feetive control requires several care- 
ful readings of the manual and a 


great deal of practice. This is not the 
sort of game you simply pop into the 
drive and play, nor is it one that is 
easily mastered. In the solitaire 
mode, your Apple is a formidable op- 
poncnt. I was only ablc to defeat it 
once or twice in the first six games. 
You should expect to take at least an 
hour to complete even the simplest 
scenario, a one-on-one encounter. 
This is due to the complexity of both 
the setup and orders phases. Estimat- 
ed time for play in the two-person 
mode should probably be doubled. 

A helpful hint: Be aure to record 
your weapon placements before leav- 
ing the sctup/design phase. If you 
don’t know where your w eapons are 
placed and w'hat are of fire each cov- 
ers, you w'on’t hit a thing. 

It would have been helpful if the 
manual had provided a brief descrip- 
tion of the ships supplied on the disk. 
Since all scenarios (except Dccpspace 
Encounter) require you to design the 
enemv fleet, information on which 
ships fit w'hich scenario is essential. 

If you enjoy thinking games that 
refjuire skills other than good eye/ 
hand coordinatimi, you will prob¬ 
ably like this one. Cosmic Balance is 
distributed bv Strategie Simulations 
Ine.. 465 Fairchild Drive, Suite 108, 
Mountain View, CA 94043. It is avail- 
able for the Apple II Plus, Apple III, 
or Apple II with Applesoft ROM 
card, and requires 48K and a single 
disk drive. ■ 

Dr. Steven Schwartz 
Pittsburgh, PA 


Spitfire Simulator 

A s a child of 121 sent aw-av a ce- 
real boxtop for a toy cardboard 
cockpit. Thus began a lifelong fasci- 
nation w ith the world of flight simu¬ 
latore. Personal computers have in- 
creased mv interest. Brace Artwick’s 
1980 program, (A2-FS1) Flight Sim¬ 
ulator, was the beginning of my key- 
board adventures in computer flight. 
Next carne an ad in a trade magazine 
for a color Space Shuttle Landing 
Simulator from Harvcys Space Ship 
Repair in New Mexico. I was one of 
the first to attempt landing the Co¬ 
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PKASO 

Printer Interface Family 



NEW! 

The IS Pipeline™ Printing Buffer 
with Random Access Printing 
Stores paragraphs or pictures 
for printing in any order—any 
number of times! 

■ Universal—works with any 
parallel [Centronics style) com 
puter/printer combinations, 

■ 8K to 128K Bytes of memory 
with data compression for effi- 
cient use of memory space. 


Wdcomes thè 
New Apple Ile... 
We work together. 


PKASO Interfaces 
come complete 
with Cable, 
Instructional 
Diskette and 
Comprehensive 
Manual 


PKASO makes it easy to use thè features of your 
printer—select character sizes, vary line spacing, 
even print in colors. Simple PKASO commands 
moke these features usable from thè keyboard or c 
program. 


The PKASO family makes you 
and your Apple Computer 
a master of text and graphics. 


PKASO 


PKASO 

o SS 


PKASO also adds features to your System. Press a 
few keys and get a snapshot "dump" of thè image 


you see on thè screen—text or graphics. Add new 


characters and symbols that you couldn't print 
before, using our SuperFont "'System. Add our 
new PipeLine printing buffer and your printer 
can take its time while you and your Apple move 
on to thè next task. The PipeLine is a modular add- 
on to thè standard PKASO board. 


The PKASO interface is designed for Apple II and 
Apple III in all thè popular configurations. It prints 
in full color on thè IDS Prism Printer, and in striking 
black on C. Itoh, Centronics, Epson, IDS, NEC, and 
Okidata matrix printers. 


Circle 28 on Reader Service card. 



Interactive Structures Ine. 
146 Montgomery Avenue 
Baia Cynwyd, PA 19004 
Telephone: (215) 667-1713 
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Figure 1. Spitfire Simulator landing scene. 


lumbia on that narrow desert strip, 
but thè graphics animation was slow. 

In 1981, when Ted Kurtz, presi- 
dent of Mind Systems Corporation, 
introduced his Airsim-1 program, I 
quickly became a computer ace at 
aerobatics and spent countless hours 
in my video cockpit learning to land 
at six airports. The self-centering joy¬ 
stick actually kept thè slow piane fly- 
ing a true course. My rapture was so 
complete that I drew an artist’s chart 
of thè New England coast and of- 
fered it to Mind Systems for distribu- 
tion to fellow Airsim-1 pilots. In re¬ 
turn for my efforts they sent me a 
preliminary disk of Spitfire Simulator 
for testing. I am not employed by thè 
company, but remain an enthusiastic 
user of their simulation products. 

The Spitfire was a fast, nimble 
piane that earned respect from her 
pilots in thè Battle of Britain. Ted 
Kurtz’s product will also gain your 
respect. However, before you grab 
thè joystick and fly, take thè time to 
read thè entire documentation. Com¬ 
plete flying lessons are included. 

After booting thè disk, you need to 
adjust your joystick and all trim Con¬ 
trols to their center position. The 
screen bursts to life with a mono- 
chrome, out-the-window view of an 
aerodrome in southeast England. To 
thè left is thè headquarters building 
and radio tower. The runway center 
stripe is barely visible at this 
worm’s-eye view. Below thè window 
are easily understood digitai instru- 
ments and an artificial horizon indi- 
cator for rapid aid in visualizing your 
altitude in relation to thè horizon. 
High sensitivity can be selected for 
thè aileron and elevator, or coupled 
together (X) for steady flying. 

Simple one-key inputs select thè 
flying modes. R enables thè versatile 
radar that can be enlarged or re- 
duced as a navigation aid, L levels 
thè piane for a safe landing, and F 
lowers thè flaps to decrease your 
landing speed. The gunsight, 
brakes, and throttle as well are all 
triggered by single key strokes. Why 
can’t all programs be as simple and 
functional? 

Control-T is thè magic button that 
transports your piane to any x, y, z 


coordinate on thè grid. The z coordi¬ 
nate gives you a choice of altitude. 
This feature saves face and gasoline 
when you wander too far from home. 

But, thè fun part of Spitfire Simu¬ 
lation is in thè flying. You’re in an- 
other time, another place, as you 
peer out your narrow canopy win¬ 
dow at thè scene ahead. With full 
throttle activated and 1280 units of 
fuel, pulì back gently on thè stick and 
at 180 mph your piane pierces thè 
air, thè runway an arrow pointing 
you on your way. Hit thè 1 key and 
thè fiat landscape becomes a 3-D per- 
spective grid with two mountain 
peaks looming in thè distance. With 
new-won confidence you do a 180° 
roll towards thè training field dead 
ahead. Careful now—resist thè de¬ 
sire to land. You need more flight 
time to learn thè Controls. Later on 
you can use practice landings, with- 
out having to worry about turns or 
leveling thè wings. 

Try an inside loop after gaining al¬ 
titude. The Spitfire is sluggish on thè 
climb, but very fast diving out. For 
added fun turn and buzz thè aero¬ 
drome radio tower, and watch it whiz 
by in fast machine code animation. 

The ultimate thrill is your first 
landing. At 3000 feet switch on R, ra¬ 
dar, for a birds-eye-view of thè ap- 
proach. If you’re pleased with your 
progress, key back thè scene, S, and 
hit O for a detailed picture of thè run¬ 
way (Figure 1). Hitting thè L key lev¬ 
els thè wings. Now, cut back your 
throttle and check thè climb rate an¬ 


gle for a smooth descent. This is thè 
time when thè speedy (360 mph) 
Spitfire is almost too fast. Take a 
needed breather with pause, control- 
P, key, then continue landing with 
control-C. Lower thè flaps, F, as you 
approach thè runway and get ready 
to decrease throttle speed. Check 
your approach angle with G, thè 
gunsight’s cross hairs. At 300 feet pulì 
back for a perfect flare landing, 
throttle to O and apply brakes, thè 
period key, for a smooth stop in thè 
middle of thè runway. Whew! 

Landing with Spitfire Simulator is 
very much like thè reai thing. It takes 
lots and lots of practice. My first 
touchdown ended in an ego-shatter- 
ing noise and a screen that went cra- 
zy. If your landing speed is too fast or 
angle too steep a crash lies ahead. 

Eventually, with diligent practice, 
you become master of your computer 
cockpit and can tackle something 
really challenging. How about load- 
ing scene 2 of thè Airsim-1 disk and 
trying to land your hot Spitfire on 
Martha’s Vineyard? All thè scenes 
from Mind Systems’ early Airsim-1 
Flight Simulator can be used with thè 
Spitfire piane. 

If landing a speedy fighter piane 
on a postage stamp field isn’t enough 
of a challenge, advance into thè 
three-dimensional world of pursuing 
enemy targets built into thè Spitfire 
program. Begin thè battle by letting 
thè computer choose your opponent, 
or, if you prefer, select one of eight 
targets by keying your choice in. To 
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conserve computer memory for thè 
targets, a simple horizon replaces thè 
grid during thè battle. The tracer 
guns (wing cannon) are activated 
with either paddle or joystick but- 
tons. Tease thè enemy by flying 
around his stick-figure 3-D fuselage 
before engaging him in combat. 
Score a hit and thè enemy becomes a 
sticker on your video scoreboard. You 
have thè advantage, as thè enemy 
never shoots back. If you score a 
number of kills and stili find your 
way back to thè base with enough 
fuel for a safe landing, you’re re- 
warded with a bonus score. With 
empty tanks you cannot use thè con¬ 
trol-T, transport, feature to magical- 
ly return to thè aerodome, for thè 
Spitfire then handles like a winged 
bomb, rnaking a landing impossible. 

This type of program is relaxing at 
thè same time as it teaches about fly¬ 
ing. I find satisfaction in leaming to 
set a course from Boston to New York 
and then maneuvering through a 
fuel-saving flight and a safe landing. 
Testing greater speeds and heights 
makes this program very rewarding. 

The joystick handles nicely as long 
as you don’t make rapid jerky moves. 
A self-centering joystick is a reai 
necessity. 

I wish there were more graphical 
landmarks and ground features, but I 
realize this takes memory. Maybe a 
64K or 128K version could be offèred. 

The manual is well written and 
follows a naturai scheme of events. 
Once you learn thè simple key Con¬ 
trols they become automatic. The 
hardest skill to learn is controlling 
your piane during landing. There 
isn’t a shortcut; you have to hang in 
there and practice. The simplified 
graphics cut down on thè realism, 
but, when thè “ground” rushes up to 
meet you at 300 mph and you are 
working feverishly to do thè right 
things, you forget that this is make- 
believe. I have run this program for 
many months and have yet to be¬ 
come bored. 

Recently I watched a color flight 
simulator on an IBM computer and 
was caught drooling on thè mer- 
chant’s machine. But, with thè expe- 
riences packed into thè Mind Systems 
package, I have enough to keep my 


interest going until Ted figures a way 
to put color into his programs. Spit¬ 
fire Simulator surely beats that static 
cereal box cardboard cutout. My in¬ 
terest in flying has been honed and 
refreshed, all without costing me 
megabucks or accidents. 

Simulators are lots of fun... I hope 
they keep coming. Happy landings! 

Spitfire Simulator is available 
from Mind Systems Corporation, PO 
Box 506, Northampton, MA 01061. 
The price is $40. It requires an Apple 
II or II Plus with 48K of RAM, DOS 
3.3, one disk drive, Applesoft in RAM 
or ROM, and game paddles or 
joystick. A modified version of Spit¬ 
fire Simulator that will run on thè 
Apple Ile is available after February 
14, 1983. ■ Philip H. Rapp 

San Diego, CA 

Know Your Apple 

M use Software has recently 
introduced a program in- 
tended to provide beginning level in- 
formation for thè novice Apple II 
user. Don’t look for programming 
hints or application data in this 
package; as a matter of fact, a por- 
tion of thè manual shows how to un- 
pack and connect thè computer, disk 
drive and monitor. 

When thè disk is booted (by fol- 
lowing thè instructions given in thè 
manual), thè title page appears. Press 
any key and a five item menu is dis- 
played alongside a high-resolution 
drawing of thè Apple II, Disk II and 
monitor. An arrow-shaped selector 
appears to thè left of thè menu and is 
used to designate thè item desired. 
The selector is moved by pressing thè 
spacebar. Once thè desired selection 
is made, press return and thè lesson 
begins. 

From within a lesson, you may 
press return to proceed to thè next 
frame, to review previous frames, 
or control-C to interrupt thè lesson 
and display thè menu. At thè end of 
each lesson, press R to repeat thè les¬ 
son or M to display thè menu. Five 
lessons are available: 

• The Monitor lesson discusses thè 
ability of thè monitor to display 
words, shapes, and data. Areas cov- 


ered include prompts, thè cursor, text 
display, and low and high resolution 
graphics. The graphics demonstra- 
tions show thè colors available and 
display an animated truck running 
into a tree. The difference in modes is 
readily apparent, since thè same 
animated sequence is used for both. 
Finally, thè lesson switches back and 
forth between thè two graphics 
modes to reinforce their difference. 

• The Disk drive lesson displays a 
high resolution graphics picture of a 
drive and disk, then discusses disks 
and their various parts. An in- 
teresting drawing that shows thè 
relative size of fingerprints, dust 
specks and human hair is included in 
thè cautions for handling disks. An- 
other set of drawings demonstrates 
how data is stored on disks and il- 
lustrates thè concepts of track and 
sector. DOS and proper handling of 
thè disk drive are also discussed. 

• Back Of The Apple is a short lesson 
that deseribes thè location and func- 
tion of thè various connectors and 
switches located on thè back of thè 
Apple. 

• Inside The Apple discusses chips, 
slots, power supply and thè in¬ 
put/output pori. An enlarged diagram 
of thè motherboard then appears 
on thè screen and thè text is dis- 
played in a box on thè upper left of 
thè screen. This section of thè lesson 
deseribes thè video out, auxiliary 
video, cassette I/O, lowercase adap- 
ter area, and thè speaker. 

• Keyboard is a high-resolution 
graphics lesson that demonstrates thè 
functions of various keys. I was par- 
ticularly happy to see zero and O dis¬ 
cussed, since that is an area of confu- 
sion for many new Apple owners. 

Know Your Apple is an interesting 
method of leaming more about thè 
Apple II computer. Operationally, 
thè program is simple and effective. 
One problem, however, is thè diffi- 
culty in exiting thè program. None of 
thè menu choices provide a way out. 

Know Your Apple is billed as a 
program that helps thè new Apple 
owner become acquainted with 
his/her computer. And it does an ex- 
cellent job of presenting valuable 
material for thè neweomer. Both thè 
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manual and thè program make thè 
new guy on thè block feel at home. I 
wish this program had been available 
when I purchased my Apple com¬ 
puter. Know Your Apple is published 
by Muse Software, 347 N. Charles 
St., Baltimore, MD 21201 and sells 
for $34.95. ■ 

Leslie R. Schmeltz 
Bettendorf, IA 

Sargon II 

I t’s hard to be humble, but believe 
me, I found a way. I dropped 
down to my locai Apple dealer thè 
other day and bought Sargon II, thè 
latest computer chess program from 
Hayden Software. It can play at 
seven levels (0-6) of expertise—well, 
I played it at level 1 and got creamed. 
So far, I’ve played it about 15 times 
and have beaten it twice. Sometimes 
ifs a little difficult to believe in 
human superiority. We are superior, 
aren’t we? 

Why buy a chess playing program? 
For one thing, you get an always 
willing opponent. The only other 
person I ever get to play chess with is 
my son. Trying to work around 
homework, Boy Scouts, and other 
pursuits, we’re lucky to get in a game 
a week. Secondly, you get an oppo¬ 
nent that (I almost said “who”) plays 
well enough to challenge your sldlls 
and help you to improve them. For 
my son, it has already begun to im¬ 
prove his game. 

To use Sargon II you need at least a 
24K Apple II with monitor, and a 
disk drive or cassette recorder. It is 
available for thè Apple on tape or 
disk. The program appears to be 
completely compatible with thè Ap¬ 
ple Ile. A friend of mine has one and 
I’ve played (and lost) on it using my 
copy of Sargon II, Having lived 
through some upward compatibility 
nightmares with mainframes, I truly 
appreciate Apple’s concem in this 
area. There are also versions for other 
computer». Since I haven’t tried thè 
tape version, FU be referring here to 
thè disk version exclusively. 

When you boot thè Sargon disk, 
you are presented with a choice of 


New Game, Change Board or Exit. 
Exit is obvious. Change Board allows 
you to set up a situation which FU 
discuss later. After choosing New 
Game, you indicate whether you 
elect to play black or white and thè 
level of play (0 to 6) in increasing 
order of expertise. 

Level 0 is for beginners, and thè 
program does not look ahead at all, 
only considering its own best coun- 
termove. Each higher level is charac- 
terized by thè minimum number of 
“half moves” thè program considers 
before deciding on its countermove; 
for example, at level 1 it considers 
three: its move, your response and its 
resporne. This is a minimum, and 



Sargon II will look deeper, especially 
in thè end game when there are fewer 
initial moves to consider. 

The documentation does not give 
minimum half moves for thè other 
levels. It does estimate average rime 
for a move at each level, ranging 
from 20 seconds at level 1 to 4 hours 
at level 6. It also says that a single 
move can take anywhere from Vi to 
three times as long. That’s right, 12 
hoursl I wonder what one does be- 
tween moves at level 6. Wash thè 
car? Panel thè living room? 

During play you have two screens 
available, between which you can 
flip by using thè escape key. One 


screen displays a list of your and thè 
program’s moves and thè other dis¬ 
plays thè board. Moves are entered in 
algebraic chess notation where files 
are lettered A-H and ranks are 
numbered 1-8, as shown in Figure 1. 

The manual really didrit make 
clear to me that you can play thè en- 
tire game with thè board displayed. 
For me, at least, this is thè best way 
to play since it emulates a traditional 
chess game. I indicate my move, thè 
piece moves, Sargon II’s piece moves, 
etc, The list of moves isn’t of great in¬ 
terest except as an occasionai refer- 
ence; it would be ni ce as a printed 
listing to record past games. 

Two useful playing features are 
control-R, to take back a move, and 
control-K, to allow Sargon II to assess 
your situation and advise a move. If 
you want to set up a situation or 
simply take back a move, you have 
that option with control-R. You must 
do this from thè Move List screen, 
however; thè manual clearly wams 
that you will get knocked off and 
have to reboot thè disk if you try it 
from thè board. 

To set up, you use indicated keys to 
access any square on thè board, emp- 
ty it, leave it as is, or fili it with any 
piece. To ensure proper casthng, you 
also must indicate whether thè piece 
has ever moved. You then indicate 
approximate move number, color 
and level of play. 

Sargon II is a good chess playing 
program. I consider it well designed, 
with many good features. I have two 
minor complaints about thè docu¬ 
mentation and two suggestions for 
enhancements. 

The manual left me with thè im- 
pression that it was preferable or 
even necessary to enter moves from 
thè Move List screen. It says, “You 
can enter a move with thè board 
displayed, but thè listing of that 
move will not appear unless you 
flip.” I had played several times and 
was somewhat irritated at thè artifi- 
cial, unchesslike bother of flipping to 
thè other screen to enter my move 
and then back to thè board each 
rime. I was pleasantly surprised 
when I accidentally entered my move 
while thè board was displayed and 
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saw thè piece move. Once you know 
that, it seems more like reai chess. I 
love surprises, especially pleasant 
ones, but thè manual ought to have 
macie this clear. 

Also, thè manual doesn’t teli exact- 
ly how to castle on thè queen side. 
The writer apparently thought it ob- 
vious that, since king side castle is 
done by entering E1,G1, then queen 
side would be E1,C1. It wasn’t ob- 
vious to me, however, and I’d have 
appreciated having thè manual teli 
me. I tried severi ways to castle 
queen side before I stumbled upon 
thè correct way. 

I suppose no one writes a program 
but what someone wants to suggest 
improvements. I’d like two on this 
one, and I wrote to thè publisher sug- 
gesting them. To date I haven’t heard 
anything, but it really hasn’t been 
very long. 


If you have to stop a game part 
way through, it would be useful to be 
able to save thè game “as is” on disk to 
pick up later. As it is, you can note 
thè positions manually and set up thè 
game as described a bove. It would be 
more convenient to save it. I suppose 
thè manufacturer would face some 
security problems, but I can’t imagine 
they’d be very difficult to solve. After 
all, it need only be a data file to teli 
Sargon II where to pick up thè game. 

Also, Td like thè ability to print out 
thè moves of a game so I could ar- 
chivè games for future reference and 
analysis. This may not be important 
to all chess players, but many do like 
to record games, and it seems unusual 
to have to do it manually when 
you’re playing against a computer. 

Even without these enhancements, 
it seems to me that Sargon II was well 
worth my $34.95, and that anyone 


who enjoys chess will find it a worth- 
while addition to thè things they can 
do with their Apple. ■ 

Ronald W. DelPorto 
Eric, FA 


Wargle 

W olves! Nasty, snarling, dan- 
gerous creatures, or so Hay- 
den Software would have us believe. 
Wargle, thè new arcade game from 
Hayden (600 Suffolk St., Lowell, MA 
07662), abruptly introduces thè gam- 
er to an entire pack of these fearsome 
critters. Nine of them to be exact, 
each with but one desire—to con¬ 
sume you. 

Consider, first, that you’re trapped 
in an island city. That doesn’t leave 
you too many places to hide. The 
wolves roam over every square inch 
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in their hunt for you. 

Quite a task at hand. Either you 
kill them, or they kill you, 

To aid in your evasion and annihi- 
lation of thè wolves you have what is 
called a wargle. On screen, this is a 
rather thick-looking arrow. Anything 
else on screen is a wolf—or an even 
deadlier canine, a werewolf. Your 
wargle can fire missiles at thè wolves. 
This capability is heartening, espe- 
cially when you learn that these mis- 
siles may be fired from either thè 
front or back of your wargle. How- 
ever, only one missile may be in flight 
at a time, so don’t depend on rapid- 
fire—there isn’t any. 

After booting thè disk, you’re of- 
fered a main menu. Here you’re in- 
formed as to thè current level in play. 
Following are four letter categories to 
select for input: P for play, L to select 
another level, K for thè key defini- 
tions you wish to use in thè game, and 
H for recording your high score to 
disk. You’re also told that a bonus 
wargle is received for every 1000 
points accrued. 

I’m right-handed, so I found defin- 
ing thè I, J, K and M keys for up, left, 
right and down movement thè most 
convenient. To fire forwards, I se- 
lected thè spacebar, and for firing 
backwards, thè return key. Escape 
became my pause key, and R thè key- 
press for resuming play. The capa¬ 
bility of allowing each player thè 
opportunity to redefine these keys is a 
welcome addition to thè game, as thè 
configuration best suited for any 
player may be used. You are then 
asked if you wish to make these 
changes permanent, at which point 
they are saved to disk if you answer 
with a Y. Even after your particular 
key mode has been saved, it can be 
changed at any time. 

Six levels of play are available: No- 
vice, Introductory, Intermediate, 
Officiai Wargle, Advanced Wargle 
and Tournament Wargle. I tried thè 
latter and was totally finished in 
about six seconds. All five of my 
'wargles became wolf fodder. A great 
deal of practice at thè Novice or In- 
troductory level is recommended be- 
fore advancing to thè higher levels of 
thè game. After selecting your de- 


sired level from thè main menu, press 
P to start thè game. 

The island city is represented by a 
bordered group of 84 squares. Your 
wargle begins play in thè lower right 
corner of thè screen, with thè nine 
wolves lined up in thè center of thè 
city area. Once they start moving 
toward thè lower edge of thè screen, 
it’s time for you to develop thè finger 
dexterity needed to stay ahead of thè 
pack, so to speak. Move you must, 
else your missile firing capability isn’t 
activated. To linger in one spot is also 
certain death early in thè game. 

You’ll note a rather disturbing oc- 
currence as you play. As you wipe out 
thè wolves, thè remaining beasts tend 
to move faster. And when seven of 
them have been vaporized, thè last 
two become extremely cunning. Af¬ 
ter all, they have thè same idea in 
mind as you—to stay alive. 


Please watch out for thè smaller 
square representations that move 
about thè city. These are thè were- 
wolves. One missile hit is required to 
turn them into ordinary wolves, at 
which point a second missile strike is 
needed to finish them off. No small 
matter, believe me. They are appro- 
priately agile. 

There are seven levels of play, each 
more difficult than thè preceding 
one. Each level requires a different 
approach. On some levels, an aggres¬ 
sive attack pian is in order. Other lev¬ 
els require maneuverability. Which- 
ever level you happen to be engaged 
in, never feel confident that you’ve 
figured out a particular wolf s course 
of action. Many of these beasties will 
suddenly change their patterns mid- 
game and leave you gasping for help. 

A four-page manual accompanies 
thè game disk, with exact instructions 


Circle 353 on Reader Service card. 


rrs FREE! 

Announcing thè NEW, Summer 1983 Moore Computer Forme and Supplles Catalog 



Now with a NEW 34-page 
computer forme section! 


i Our new, 80-page Summer Catalog features 
more than 800 guality, brand-nanne products— 
all guaranteed to meet your 100% satisfactlon 
or your money back 

i For all your computer or word processor needs, 
a wide selection of magnetic media, disk Stor¬ 
age, binders, ribbons and furniture 

i Over 40 pages of multi-purpose computer forms 
and labels at low prices, including an ALL- 
NEW 34-page section of imprinted forms 
■ Unmatched customer Services, like fast order 
processing, custom imprinting, emergency over- 
night delivery, plus exclusive toll-free Techni- 
cal Produci Assistance 


Mail this coupon or cali 
toll-free 

1 - 800 - 323-6230 

(In Illinois. Cali (312) 459-0210) 


AA 


Catalog Group 

MOORE 


□ YES! Send me a FREE 80-page, full-color 
copy of thè Summer 1983 Moore Catalog 

_ ( ) 

YOUR NAME TITLE BUSINESS PRONE 

COMPANY NAME " ~~ 


CENTER 

A Division of Moore Business Forms 

P.O. Box 20 
Wheeling, IL 60090 
Dept. 120411 


city 


STATE 


ZIP 


COMPUTER MAKE ANO MODEL 


TYPE0F BUSINESS 


NO. OF EMPLOYEES 


May 1983 feider 191 










Reviews 


on how to play Wargle and a small 
section on revealing hints for higher 
scores. Wargle is a fine arcade game, 
compatible with thè Ile, and one of 
Hayden’s better attempts in this vein. 
The price ($34.95) seems a little 
steep, but I would not want to do 
without Wargle in my software li¬ 
brary. Very enjoyable. ■ 

Hartley G. Lesser 
inCider staff 


Academic Skill Builders 

F inding quality educational soft¬ 
ware for thè Apple II is a major 
problem facing parents and educa¬ 
tore today. As thè Apple II appears in 
more and more schools, bewildered 
teachers are scanning catalogs of soft¬ 
ware and trying to sort out useful ma- 
terials from ineffective teaching 
tools. A new math sldll-building 
package from Developmental Leam- 
ing Materials should make thè job 
easier, at least for primary level 
teachers. 

Academic Skill Builders is a pack¬ 
age of six games which combine thè 
excitement of arcade games with ba¬ 
sic math drills. Proficiency in prima¬ 
ry math skills comes with practice; 
and of all thè primary subjects, 
mathematics has been thè area where 
practice has traditionally been equat- 
ed with drudgery. This package of 
math games tums math drills into 
sheer pleasure for children. 

The firet game, Alien Addition, is 
presented in a format similar to Space 
Invadere; a gun platform is displayed 
at thè bottoni of thè high-resolution 
color graphics screen. Using thè ar- 
row keys, thè player positions thè gun 
underneath attacking alien flying 
saucere. Each saucer displays an ad¬ 
dition problem, using numbers 0 
through 9. To fire thè weapon thè 
player must input thè correct answer 
to one of thè problems, position thè 
gun underneath thè appropriate sau¬ 
cer and hit thè space bar. 

Boxes at thè bottom of thè video 
screen tally thè number of hits and 
misses. If die aliens land a ship at thè 
bottom of thè screen, thè gun is de- 
stroyed, a new gun appears, and thè 


barile continues. After one to five 
minutes, thè display ends and a text 
screen displays thè hit and miss score 
for thè current game as well as low 
and high game scores. This gives a 
parent or teacher a chance to monitor 
progress. 

Minus Mission follows a similar 
format. This rime a player’s roving 
gun shoots drippingslimes, each con- 
taining a subtraction problem. After 
choosing thè right answer, thè player 
can position thè gun and fire. As with 
thè addition game, there is a rime 
limit; and there are opportunities to 
make periodic progress evaluations. 

Addition and subtraction skills are 
combined in Alligator Mix, thè most 
entertaining game in thè set. As thè 
game begins, a Ione alligator swims 
toward thè bottom of thè video 
screen, and a number is displayed in¬ 
side his stomach. As thè alligator sits, 
an appiè, containing an addition or 
subtraction problem, floats in its di¬ 
rection. When thè number in its 
stomach answers thè problem cor- 
rectly, thè player hits thè space bar, 
thè alligator’s mouth opens, and it 
swallows thè appiè. If thè answer 
doesn’t match thè problem, thè play¬ 
er can use thè space bar to snap thè 
alligatori mouth shut. 

The trick to this game is swallow- 
ing only thè right apples. They come 
at thè alligatore quickly, forcing thè 
player to make rapid calculations. 
Once thè firet alligator is fillèd, a sec- 
ond appears, then a third, fourth and 
a fifth. Each alligator level allows thè 
player less rime to decide whether or 
not thè appiè contains thè right prob¬ 
lem for thè answer. As with thè other 
games, there is a rime limit after 
which thè performance of thè player 
is measured. 

Meteor Multiplication and Demo- 
lition Division are games that put a 
little more pressure on thè player and 
present more of a challenge on thè 
eye/hand skill level. In thè multipli¬ 
cation game, thè player Controls a 
space station, surrounded by eight 
converging meteore, at thè center of 
thè screen. Each meteor contains a 
multiplication problem using num¬ 
bers 0 through 9. 

Using thè number keys to supply 


thè right answer and thè arrow keys 
to turn thè gun, thè player selects an 
answer for one of thè meteore, points 
thè weapon and hits thè space bar to 
shoot. If a meteor is left undestroyed 
by a well-aimed right answer, it will 
destroy thè space station. 

In Demolition Division thè player 
commands five anti-tank gun em- 
plaeements that are protected by 
stone walls. An enemy tank, contain¬ 
ing a division problem, approaches 
each emplacement. The player must 
select answers to thè problems and 
position them at thè appropriate gun, 
then hit thè space bar to fire—before 
thè tank can fire enough rounds to 
destroy a gun. As with thè other 
games, thè action stops, allowing thè 
player to monitor thè number of hits 
and misses. 

Skills are combined again in thè 
sixth and final game, Dragon Mix. A 
friendly dragon protects a city, and 
three flying saucere, each containing 
a multiplication or division problem, 
attack. The answer to one of thè 
problems is displayed inside thè drag¬ 
on. The player must shoot and de¬ 
stroy thè problem whose solution is 
inside thè dragon. If thè shot misses, 
thè saucere blast part of thè city. 
Again, thè game will pause from rime 
to time to give a player or teacher a 
chance to check thè scores. 

Kids, and parents too, found Mete- 
or Multiplication, Demolition Divi¬ 
sion and Dragon Mix sometimes a bit 
fast-paced. A parent commented that 
he and his child found it difficult to 
destroy all thè meteore approaching 
thè space station in Meteor Multipli¬ 
cation. Without this reward, he said, 
interest waned quickly. Similar ob- 
servations were made about thè other 
advanced games; but even so, chil¬ 
dren and parents shared generally fa- 
vorable impressions. 

A comment was made that thè 
games were noisy, but I don’t think 
thè sound effects were loud enough to 
be disruptive in a classroom. The 
sound effects actually enhance thè 
entertainment value of thè games, 
which, in tum, helps keep thè child 
in front of thè screen. 

Another issue is whether or not 
these games make hyperactive stu- 
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They are made of white corrugated cardboard and are dust resis- 
tant. Use them to keep all your magazines orderly yet available 
for Constant reference. 

Self-sticking labels are available for thè following: 

80 Micro 73 Magazine Radio Electronics 

Microcomputing QST Personal Computing 

inCider CQ Byte 

Desktop Computing Ham Radio Interface Age 

One box (BX1000) is $2.00, 2-7 boxes (BX1001| are $1.50 each, 
and 8 or more boxes (BX1002) are $ 1.25 each. Be sure to specify 
which labels we should send. 

Cali TOLL-FREE for credit card orders: 

1 - 800 - 258-5473 

Or use thè order form in this magazine and mail to: 




èider 


‘Apple is a renistered trademark of Apple Computer. Ine. 

“TRS-cSO is a trademark of thè Radio Shaek Division of Tandy Corporation. 
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Attn: Book Sales, Peterborough, NH 03458 

□ SHIPPING AND HANDLING CHARGES $2.00 per order □ 


BTA MODEL 953B EPROM PROGRAMMER-$359 


•a 



_ BAY TECHN1CAL ASSOCIATES, ine., 

HWY. 603, P O. BOX 387 
BAY ST. LOUIS. MISSISSIPPI 39520 
(601)467-8231 


Programs 2508, 2758, 2516, 2716, 27C16, 2532, 2732, 2732A, 27C32, 2564, 
2764, 27C64, MCM68766, 27128. 

RS-232, 3 line serial interface, Xon/Xoff format, DB-25 I/O connector. 

No personality modules - software control EPROM selection. 

Extended diagnostica. 

LED warning indicates power applied to EPROM socket. 

Supports Intel, Motorola, and Intel 8086 data formats as well as HEX data 
dump. 

Automatic baud rate selection. 

Textool zero insertion force socket. 

Available CP/M software. 

Model 953A. proarams most 24 pin EPROMS. Price - $269.00 
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What SAWY is - 

SAWY is a miraculous new 
information handling System. 
SAWY is an automatic database 
management System. 

SAWY is a new level of 
machine intelligence. 

SAWY, part hardware, 
part software, is thè 
beginning of truly 
"Personal Computing ", 

SAWY Comes with: 

General Ledger, 

Accounts Receivable, 

Accounts Payable, 

Payroll, Mailing List, 

Document \X/riter and 
Inventory Control. 


Trademark: SAWY, Robot Programmer: 
Excalibur Technologies Corporation. 

Personal Language: SAWY Marketing 
International. 


What SAWY does - 

Through SAWY, you and your 
computer talk to each other in your 
own naturai, conversational 
English (or Spanish, or 
-- - French, etc.). 

It learns from you 

***, what y° u want 

done in your own 
personal language. 

Once SAWY learns 
your language it 
can create any file 
you wish. Input, 
output, additions, 
changes and 
k. • iYElii deletions are 
^ arranged for you. 

W **^ ; ' , ^^/Ys SAWY 's "Robot 
BF ' '%sXJ 'r Programmer” 
W been trained 

to write 100% 
of thè programs 
needed to manage your 
database information. 
SAWY runs CP/M™ 
and Apple DOS. 





What YOU discover — 

You'll discover that SAWY 
recognizes your personal words, 
even if misspelled, or even if you use 
a phrase never used beforel 
SAWY continues to grow through 
use to become better and better at 
understanding your commands. 
Eventually, you will see SAWY as a 
mirror to your own way of thinking 
and working. It is a re-definition of 
"user-friendly ". 

SAWY, it s thè first System that truly 
means "personal computing ". 

SAWY is like no other System on 
earth. 

SAWY cost $950. 

Seeing is believing. SAWY is on 
display at selected computer retail 
locations. Cali for thè name of your 
nearest dealer. 

CP/M is a trademark of Digital 
Research Corp. 

Apple is a Trademark of Apple Computer 
Ine. 
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dents unmanageable. The excitement 
level is high, but I think games like 
these channel high energy levels con- 
structively. 

A teacher’s manual explains thè 
reasoning behind thè games and also 
makes valuable suggestions for inter- 
preting results. Game experiences are 
recalled and skills are reinforced by 
use of special flash cards, which con- 
tain Solutions for 52 of thè most diffi- 
cult problems. The teacher’s manual 
suggests activities for thè use of thè 
cards in conjunction with thè game 
software. 

This software can be used by both 
parents and teachers to eliminate 
fear, dread and drudgery from pri- 
mary grade math drills. Academic 
Skill Builders is available from DLM 
at One DLM Park, Alien, TX 75002. 
Price is $220. ■ 

Brian J. Murphy 
Fairfield, CT 


Casino 

G ather round and ante-up, 
guys. Card sharks are not al- 
lowed at thè Golden Apple Casino. 
This hi-res card disk opens up with 
chords from The Entertainer, and 
then opens a bank account of $1000 
in your name. Quit at any time and it 
debits or credits your account with 
thè results of your luck at thè gaming 
tables. Your balance is always cur- 
rent when you boot thè disk. The ac¬ 
count file keeps a record of your ac¬ 
count at each table. 

The main menu opens with your 
choice of: New Player, Individuai 
Statistics, Top Five Scores, Delete a 
Player, Music On/Off, and so on. I 
entered and played 20 players at dif- 
ferent gaming tables, rotating names 
and games, and it kept track of it all. 
Impressive! 

There are five different games to 
play: blackjack, keno, poker, roulette 
and baccarat. You are offered thè op- 
portunity to look at a page or two of 
instructions on each game at any time 
before or during play. Just hit R for 
rules or Q for quit. Tbe QUIT com- 
mand will then save your current ac¬ 
count to disk. Good thinking. 


The large repertoire of music, 
while cute at first, can get on your 
nerves after awhile. The card games 
are all in hi-res and well done. I start- 
ed with $1000 and managed to bank- 
roll it to $140,000 in two long 
sittings! 

Casino is an excellent game with 
save features, produced by Data- 
most, 9748 Cozycraft Ave., Chats- 
worth, CA 91311. Its price of $39.95 
is a bit high. Try a demonstration, I 
think you’ll like it. Good Luck! ■ 

George M. Engel 
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Jawbreaker 

I f there is one word I hate to use in- 
discriminately it’s cute. But for 
some reason, cute is thè only adjec- 
tive I can think of to describe Jaw¬ 
breaker, a new game for thè Apple II 
from Sierra On-Line. 

Jawbreaker is from thè Pac-Man 
school of maze-type games. A set of 
chomping teeth is pitted against a 
barrage of sweets in a video candy 
store. Your choppers are controlled 
by either thè keyboard or a joystick. 
The object is to munch as manv treats 
as possible and to avoid attacking 
“smile faces” that periodically roll 
your way. Biting into a happy face 
can be a tooth-smashing disaster un- 
less you first swallow an energizer. 

The maze itself is interesting. It 
constantlv shifts thè openings be- 
tween levels back and forth. Timing 
is criticai. The action is quick and thè 
graphics bright and entertaining. Af¬ 
ter finishing a level, your teeth are 
brushed and vou’re on to thè next 
level. After completing a few levels, 
Jawbreaker provides an entertaining 
floor show. I have to admit I was 
amused. 

An interesting option is offered for 
those who choose thè keyboard for 
input. Jawbreaker lets you decide 
which keys will be used for up, 
down, left, right and stop. Why don’t 
we see this more often? 

The game can be adjusted to your 
taste with ten different levels of diffi- 
culty. The lowest level, 0, is great for 
kids. It’s slow enough for even thè 
youngest to enjoy. 

This may not be a game for serious 
arcaders, because thè same four-level 
maze is displayed every time. Once 
you get thè pattern down, it is not 
difficult to breeze right through. But 
for a family game, or for something 
to entertain thè kids, Jawbreaker is 
hard to beat. Persons who find thè 
majority of arcade games too violent 
will find nothing to fear in Jaw¬ 
breaker. This game is so cute, it is 
hard not to like it. ■ 

Chuck Doherty 
South Dartmouth, MA 







Calendar 



May 4-6 

Rocky Mountain 

Data Processing Expo (exhibits) 

Denver, CO 

contact: 

Industriai Presentations West 
3090 S. Jamaica Court 
Suite 304 

Aurora, CO 80014 
(303) 696-6100 

May 13-15 

Applefest Boston 

Boston, MA 
contact: 

National Computer Shows 
822 Boylston St. 

Chestnut Hill, MA 02167 
(617) 739-2000 

May 16-19 

National Computer Conference 

(exhibits) 

Anaheim, CA 
contact: 

AFIPS 

1815 N. Lynn St. #800 
Arlington, VA 22209 
(703) 558-3600 

May 23-26 
Data Base Week 
San Jose, CA 
contact: 

Robin Williams 

IBM Research Division 

K55-282 

5600 Cottle Road 
San Jose, CA 95193 

May 24-26 

Microprocessor Background 
for Management Personnel 
Palo Alto, CA 
contact: 

Continuing Education in Engineering 
Dept. 532N 

University of California Extension 


2223 Fulton St. 

Berkeley, CA 94720 
(415) 642-4151 

May 25 

Trends and Applications 1983 
Gaithersburg, MD 
contact: 

Trends and Applications 
PO Box 639 

Silver Spring, MD 20901 
(301) 589-8142 


June 3-5 

Boston Personal Computer Show 

(exhibits) 

Boston, MA 
contact: 

National Computer Shows 
822 Boylston St. 

Chestnut Hill, MA 02167 
(617) 739-2000 


June 6-8 

National Education 
Computer Conference 
Baltimore, MD 
contact: 

NECC 
PO Box 639 

Silver Spring, MD 20901 
(301) 589-8142 


June 26-29 

Design Automation Conference 

Miami Beach, FL 

contact: 

Dr. Charles E. Radke 
IBM Corporation 
Hopewell Junction, NY 12533 
(914) 485-7763 


July 25-28 

SoftFair—Software Development, 
Tools, Techniques and Altematives 
Arlington, VA 
contact: 

SoftFair 
PO Box 639 

Silver Spring, MD 20901 
(301) 589-3386 


June 27-29 
June 20-July 15 

CE (Computers in Education) ’83 

weekend conference; 
four-week institute 
Rutgers University, NJ 
contact: 

Dr. Mitchell E. Batoff 
Institute for Professional 
Development 
245 Nassau St. 

Suite D 

Princeton, NJ 08540 
(609) 924-8333 

If you are organizing, or otherwise 
know of, an event important to Ap¬ 
ple users, and wouìd like it listed in 
thè inCider Calendar, please drop 
us a line at Pine Street, Peterbor- 
ough, NH 03458. Include thè nartie 
of thè event, thè date, thè location, 
and thè name of a contact for further 
information. 

—thè editors 
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STOCK MARKET 
SOFTWARE 


Increase your profits with 0PTI0NX,™ 
thè ultimate option analysis program 
for thè Apple computer. 

Extremely easy to use. For experi- 
enced option writers and specula¬ 
tore. Includes thè Cleeton model 
and Bookstaber’s extension of thè 
Black-Scholes model. Automatic 
calendar, stock data base manager, 
recursive calculation of volatility, 
and much more. 65 page manual 
completely describes thè program 
and thè equations used. Requires 
DOS 3.3 and 48K. 

Send $145.00 for thè program and 
manual. Return for full refund in 15 
days if not satisfied. 

Request free brochure describing 
0PTI0NX™ and other sophisticated 
stock market software. 

Crawford Data Systems 

P.O. Box 3000 - 561H 
Camarillo, CA 93011 
(805) 484-4159 

CA residents please add 6% tax. 
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New Software 

edited by Tom Woods 



MasterType combines thè action oj a space invader game with a serie s of typing lessons. 


Fantasy Game 

Sierra On-Line Ine., 
36575 Mudge Ranch Road, 
Coarsegold, CA 93614, of- 
fers a fantasy game, The 
Dark Crystal, that is based 
on thè motion picture of 
thè same name. The player 
must replace a missing 
shard in thè broken crystal 
in order to save thè world. 
Price is $39.95. Reader Ser¬ 
vice number 441. 


Algebra 5 

Edu-Ware Services Ine., 
Box 22222, Agoura, CA 
91301, offers Algebra 5, 
thè fifth program in a series 
that is equivalent to a first- 
year course in algebra. Stu- 
dents can work sample 
problems, read a discussion 
of a concept, watch as an 
equation is solved, or study 
thè rules that govern an op- 
eration. Algebra 5 covers 
irrational numbers, radicai 
expressions, square roots, 
quadratic equations and 
quadratic inequalities. 
Price is $39.95. Reader Ser¬ 
vice number 442. 


Music Maker 

Apple II owners can cre¬ 
ate and play music with 
Music Maker. The user can 
enter dotted notes, triplets, 
quintuplets, staccato, reg- 
ular or legato notes. The 
range of 50 tones—from F 
below low C to F§ above 
high C—gives thè notes 
necessary for virtually 
every melody ever written. 

No special programming 
knowledge is necessary. 
The sound signal can be 
sent to thè Apple’s own in¬ 
ternai speaker or routed to 
thè cassette port where thè 
output can be used to drive 
an external amplifier and 
speaker System. Price is 
$39.95. Contact subLOG- 
IC Corporation, 713 
Edgebrook Drive, Cham- 
paign, IL 61820. Reader 
Service number 443. 


Chemistrv Queries 

Cross Educational Soft¬ 
ware, 1802 N. Trenton St., 
Box 1536, Ruston, LA 
71270, offers four new 
chemistrv question files 


that contain over 1600 
questions on 70 topics. 
Chemistrv 601 and 602 
cover high school chemis- 
try topics, while Chemistry 
603 and 604 are more ad- 
vanced. Each program 
contains multiple choice, 
matching and essay ques¬ 
tions. Questions may be 
selected in any order and 
may be taken from several 
questions disks. Price is 
$49.95. Reader Service 
number 444. 


The Filer 

Central Point Software 
Ine., Box 19730-|203, 
Portland, OR 97219, offers 
thè Filer, an Apple disk 
utility System for 35, 40 
and 70-track drives. The 
Filer package contains a 
disk drive speed check, disk 
drive test, a 35-second copy 
program and a file manag¬ 
er. Options include: Copy 
Files, Copy Disk, Copy 
DOS, Delete, Lock and 
Unlock Files, and Change 
Booting Program. Price is 
$19.95. Reader Service 
number 449. 


MasterTvpe 

Apple II users can learn 
touch-typing skills in a 
video space wargame for¬ 
mat with Lightning Soft- 
ware’s MasterType. Mas- 
terType combines thè 
action of a space invader 
game with a series of 17 
progressive typing lessons. 
Following each lesson a 
report of thè number of 
words typed and number 
of words mispelled is dis- 
played. 

MasterType includes a 
manual that contains hints 
on how to win thè game, 
finger charts for thè key- 
board, suggestions for suc- 
cessful touch-typing, and 
descriptions of thè prepro- 
grammed language. Price 
is $39.95. Contact Light¬ 
ning Software, Box 11725, 
Palo Alto, CA 94306. Read¬ 
er Service number 440. 


Menu Maker 

The Menu Maker, a util¬ 
ity for Applesoft program- 
mers, helps create and edit 
disk program menus. Thir- 
ty items per menu and 15 
submenus can be created. 
Editing capabilities in¬ 
clude add, delete and 
change. Contact LRH En¬ 
terprises, 358 Ashley Blvd., 
New Bedford, MA 02746. 
Price is $19.95. Reader Ser¬ 
vice number 445. 


Strategy Games 

Mirrar Images Software 
Ine., 1223 Peoples Ave., 
Trov, NY 12180, offers two 
new strategy games de- 
signed for thè Apple IL 
Both are sold on thè same 
disk for $34.95. 

Hide and Sink is a strate¬ 
gy game of thè high seas. 
The challenger is equipped 
with a naval fleet of vari- 
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That’s why Apples and Ataris are saying: 

“Talk Is Cheap” 


ITS CALLED 

THE SOFTWARE AUTOMATIC MOUTH, 
S.A.M. FOR SHORT 

ts a high quality speech synthesizer 
:reated entirely in software. You use it 
is a software utility, load it into RAM. 
ind then use your machine as usuai, 
ixcept now you can make your pro- 
jrams talk. It generates thè speech 
lounds on demand, so there is no limit 
o what it can say. 

When you hear S.A.M., you ll prob- 
ìbly agree that it sounds better than all 
he hardware speech synthesizers for 
\pple or Atari computers. And, it has a 
ruly remarkable price. 

YOU CONTROL INFLECTION, 
PITCH AND SPEED 
N ith its user-variable inflection, S.A.M 
:an accent words on thè right syllable 
ind emphasize thè important words in 
i sentence. 

You can also make S.A.M.s speech 
ligher or lower, and faster or slower, 
>ver a wide range of settings. 


USE EASY PHONETIC INPUT 
OR PLAIN ENGLISH TEXT 

S.A.M. understands a simple phonetic 
spelling System, not a mysterious 
alpha-numeric code. S.A.M. helps you 
learn phonetic spelling by showing you 
your mistakes, and thè owner s manual 
gets you started with an English-to- 
phonetics dictionary of 1500 words. So 
its easy to make S.A.M. produce 
exactly thè sounds you 
want. 

But suppose you 
want to type ordinary 
English. or you want 
your machine to read a 
word processor file 
aloud. The S.A.M. 
disk Comes with RECI- 
TER, an English text- 
to-speech conversion 
program that lets 
S A.M. speak from 
plain English text. 


SANI 



ADD SPEECH TO YOUR PROGRAMS 
WITH EASE 

In a BASIC program, you add speech 
with just a couple of commands. In a 
machine language program, its just as 
easy. S.A.M. Comes with four demon- 
stration programs to show off its dis- 
tinctive features and help to wnte your 
own talking programs. Wnte adventure 
games with talking characters, educa¬ 
tional programs that 
explain aloud, or 
Utilities with spoken 
prompts - put your 
imagination to work. 




You can order 
S.A.M. directly from 
DON T ASK. Add 
$2.00 for shippmg and 
handling to your check 
or money order (or 
order C.O.D.) 


S A M programmed by Mark Barton 


S.A.M. for thè Apple 11/11 + 

Includes an 8-bit digital-to-analog con¬ 
verter and audio amplifier on a board. 
Only $124.95 

Requires48K. disk. (S.A.M. takes upto 
9K; RECITER 6K.) You will also need 
a speaker. 

S.A.M. for thè Atari 400/800 

S.A.M. talks through your television 
speaker. No additional hardware is 
required. Only $59.95 
Requires 32K. disk. (S.A.M. takes up 
9K: RECITER 6K.) Note: to produce 
thè highest quality speech. S.A.M. 
automatically blanks thè screen during 
vocal output; thè display is preserved. 
S.A.M. can talk with thè screen on. but 
thè speech quality is reduced. 


D©IYT ASK 

COMPUTER SOFTWARE 


INC 


2265 Westwood Boulevard, Suite B-150 
Los Angeles, California 90064 
Telephone (213) 397-8811 


Hear S.A.M. at your favorite computer store 
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New Software 


What’s eating 
your Apple? 

Find out with Apple-Cillin II™ 

If you use your Apple for your business or 
profession, you probably rely on it to save you 
tlme and money. You can ’t afford to guess 
whether it is working properly or not. Now you 
don ’t have to guess. Now you can find out 
with Apple-Cillin II. 

Apple-Cillin II is thè comprehensive diagnostic 
System developed by XPS to check thè 
performance of your Apple II computer System. 
Apple-Cillin II contains 21 menu driven Utilities 
including tests for RAM memory, ROM 
memory, Language Cards, Memory Cards, 

DISK System, Drive Speed, Keyboard, Printer, 

CPU, Peripherals, Tape Ports, Monitors and 
more. These tests will thoroughly test thè 
operation of your Apple, and either identify a 
specific problem area or give your System a 
clean bill of health. You can even log thè test 
results to your printer for a permanent record. 

Apple-Cillin II works with any 48K Apple System 
equipped with one or more disk drives. 

To order Apple-Cillin II - and to receive 
Information about our other produets - Cali 
XPS Toll-Free: 1-800-233-7512. In Pennsylania: 
1-717-243-5373. 

Apple-Cillin II: $49.95. PA residents add 6% 

State Sales Tax. 


XPS, Ine. 

323 York Road 
Carlisle, PA 17013 

800-233-7512 

717-243-5373 


XPS 


Apple is a registered trademark of Apple Computer Ine. 


ous vessels, which are hid- 
den on a 10-by-10 sea grid. 
The fleet is pitted against 
thè computer’s fleet. Full 
color graphics display thè 
status of both fleets, reg- 
ister hits and misses, 
and prompt players to 
make moves. 

Hextay is a computer- 
ized board game inspired 
by thè ancient Chinese 
game of Go. Players take 
turns placing their “stones" 
on thè computer’s screen 
board, one at a time. The 
object of thè game is to 
dominate thè board by sur- 
rounding opponents and re- 
moving their stones. Reader 
Service number 455. 


Customized Tests 

TestRite is an education¬ 
al program that Stores test 
items and generates cus¬ 
tomized tests. It is suitable 
for use by teachers at all 
grade levels. Test items 
from any discipline may be 


entered, edited and printed 
into classroom tests and 
study guides. Large tests 
can be created by merging 
multiple files of questions. 
Even - question may be 
printed in any of four for- 
mats: multiple choice, 
true/false, matching and 
completion. Price is $139. 
Contact Class 1, 17909 
Maple St., Lansing, IL 
60438. Reader Service 
number 447. 


Word Weaver III 

Synergistic Software, 
830 North Riverside Drive, 
Renton, WA 98055. offers 
Word Weaver III, a new 
program for thè Apple III 
that can be used for a vari- 
ety of word processing 
functions. 

Output can be printed 
with various shaped mar- 
gins in geometrie designs 
for advertising or greeting 
cards. Writers can orga- 



est Rite 

Irti Ite-in Bank Software 


1 Svsicim 

mah* ùntrr 

Mtìi't tliAnn «mu 


Tesiliite, from Class 1. 
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Circle 26 ori Reader Service card. 



Agri-Ledger accounting System from Small Business Computer Systems. 


nize text by using global are included for both farm 

editing commands that and personal items. Price is 

provide replace, delete, $550. Reader Service num- 

move, kill and copy fune- ber 451. 
tions. Text can be dis- 
played on thè screen in 80 
columns and printed out¬ 
put may be up to 185 col- Bulk Mailer 
umnsinwidth. A single file Satori Software, 5507 
can hold 15 to 20 pages of Woodlawn Ave. N., Seat- 

text on 128K machines, tle, WA 98103, offers Bulk 

and files can be linked dur- Mailer, a specialized data 

ing printout. Price is application program for thè 

$99.95. Reader Service Apple II hard disk user, 

number 454. Bulk Mailer includes on- 

line access to 32,000 names, 
complete and fast zip sort, 
alphabetical sort, coding 
Agri-Ledger capability, and duplica- 

Small Business Comput- tion/elimination search. 

er Systems Ine., 4140 The disk version of Bulk 

Greenwood, Lincoln, NE Mailer is $ 125 - The Corvus 

68504, offers Agri-Ledger, version is * 250 - Rcader Ser ' 

a menu-driven, double-en- v * ce num ‘ )er 450. 

try accounting System for 
agricultural operations. 

Designed for Apple com- 
puters, Agri-Ledger prò- Millionaire 

vides for income state- Millionaire, The Stock 
ments and balance sheets. Market Simulation, is now 

budget reports, enterprise available for use on the Ap- 

analysis and quantity pie II Plus. The object of 

fields. Cash flow templates this fantasy game is to be- 


•• :-".v .■ ; •....Vv.\v>: \Y.\ i Vi,'/.•,////, • /••••. . 





-, ■ : 
: : ,, ^ 

Word processing at 

■ìtp finest. PòWerful and ver¬ 
satile, yet easy to use and 
naturai. Designed for the 
business and professional 
environment (or for anyone who wants the best). 
Simple control commands. Typewriter-style shift 
and lock. Glossary. Form letters and mailing lists. 
Menus for disk access and printing. DOS 3.3 com- 
patible text files. 40 or 80 column display. 
Modifiable drivers for most interface cards and 
printers. $295. 

Communications 

add-on for ZARDAX. 
Turns ZARDAX into a 
communicating word pro¬ 
cessor, to send and 
receive text files. Talk to other Apples, mainframes, 
information Services, typesetters. Includes termina’ 
mode. 300 or 1,200 baud. Works wìth serial, 
modem, and popular 80 column cards used by 
ZARDAX. Log-on files and X-on X-off supported. 
$80. 

“Apple Interactive Data 
Analysis.” Statistical 
analysis package for 
production research work 
with large survey data 
files. Full range of analysis — from descriptive 
statistics to multiple regression. Complete data 
manipulation, transformation and case selection. 
Fast and accurate calculations. Up to 4,000 cases 
and 255 variables per file. $235. 


Just push our button. . . 

Action-Research Northwest 

11442 Marine View Drive, SW. 

Seattle, WA 98146 

(206) 241-1645 Source: CL2542 


Apple 1[ is a trademark of Apple Computer, Ine. 

ZARDAX is a trademark of Computer Solutions, Pty., Australia 

Dealer inquiries invited. 
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New Software 



Automate your lab 
with ALIS 


lf you work with pH meters, timers, positioners, 
chromatographs, flow meters, BCD devices — in 
short, almost ANY device which accepts or gener- 
ates an analog or digitai signal — ALIS will turn your 
APPLE into a true REAL-TIME automation System. 

If you can program in BASIC, then ALIS’ Applesoft- 
callable interface software can have you talking to 
your world at once. 

Display your results immediately or analyze off-line 
with a hi-resolution graphing package which you can 
modify. ALIS is thoroughly documented with over 100 
pages of readable manuals. 

You can add an ALIS automation 
System in minutes! 

No machine language programming. Nosoldering. 
ALIS hardware is complete and preassembled — 
Apple interface, cabling, terminal box, test switches 
— as easy to add as a printer. 

Just connect thè “reai world” and GO/...at 
software-controlled rates up to 10,000 data points per 
secondi 

ALIS high-speed reai world interface Systems are avall¬ 
atile NOW for thè following configurations: 


Precision Analog Input: ALIS/A12. $ 1,517 

(16 channels, .024% Acc., lOOmV min. full scale) 

Analog Input: ALIS/A08. $ 1,149 

(16 channels, .39% Acc., 5 Volts full scale, 5 kHz max.) 

Analog Output: ALIS/AO. $841 

(2 channels, .39% Acc., 10 Volts full scale) 

Digital Input/Output: ALIS/DIO. $1,600 


(32 bi-directional channels, quad timers, interrupts) 

ALIS Systems require a 48K Apple, Applesoft, DOS 3.2 or 3.3 

For additional information, detailed specifications, 
and price schedule, contact: 

oco-tech, ine. 

2990 Lake Lansing Rd. • P. O. Box 776 • East Lansing, MI 48823 
(517) 337-9226 

ALIS is a trademark of Eco-Tech, Ine. 

APPLE and APPLESOFT are trademarks of Apple Computer, Ine. 


come a millionaire in thè 
stock market. Players can 
choose to buy and sell 15 
different stocks, and infor¬ 
mation is provided to help 
players make informed de- 
cisions. Charts of overall 
market activity over an ex- 
tended period of time and 
of selected industry seg- 
ments can be displayed. 
Price is $79.95. Contact 
Blue Chip Software, 19824 
Ventura Blvd., Suite 125, 
Woodland Hills, CA 
91364. Reader Service 
number 457. 


Pick That Tune 

Pick That Tune con- 
tains 100 different songs 
divided into four cate- 
gories: popular, country 
and western, children and 
TV. Players choose thè 
number of notes they think 
they must hear to correctly 
identify thè tune. Using a 
sound generator, Pick That 
Tune begins with thè lowest 
bidder and then plays thè 
number of notes each play¬ 
er has bid until thè tune has 
been identified. 

There are 16 different 
variations of thè game. Top 
ten player files are auto- 
matically maintained for 
each of thè game variations. 
Price is $29.95. Additional 
tune categories may be pur- 
chased separatelv. Contact 
Swearington Software, 6312 
W. Little York, Suite 197, 
Houston, TX 77'088. Read¬ 
er Service number 446. 


Save an Empire! 

Zendar is an economie/ 
defense game in which thè 
player must take charge of 
a failing empire. The play¬ 
er must allocate aid and re- 
sources, annex other coun- 


tries, make trade agree- 
ments, and defend thè em¬ 
pirei borders from enemy 
attack. Zendar is $29.95 
and will run on any DOS 
3.3 Apple II System with 
48K memory and Apple¬ 
soft ROM. Contact sub- 
LOGIC Corporation, 713 
Edgebrook Drive, Cham- 
paign IL 61820. Reader 
Service number 456. 


Children’s Games 

Xerox Education Publi- 
cations, 245 Long Hill 
Road, Middletown, CT 
06457, offers two new pro- 
grams for children. Stickv- 
bear Numbers helps young 
children develop number 
recognition and counting 
skills. Included with thè 
program disk are a num¬ 
bers poster and a 32-page 
hardbound book. Old 
Ironsides is a game of naval 
strategy and skill that in- 
cludes a log book for re- 
cording battles, voyages 
and scores. Both programs 
are $39.95. Reader Service 
number 452. 


Cross Assembler 

The XASM-80 Cross As¬ 
sembler is a software pack¬ 
age that allows 8080 soft¬ 
ware development on an 
Apple IL The package con- 
sists of an editor and an as¬ 
sembler. The editor en- 
ables thè user to create 
8080 assembler source and 
text files. Files may be 
saved either on disk or used 
as input to thè assembler. 
The assembler assembles 
8080 source programs and 
generates a program listing 
and an object code. Cost is 
$45. Contact Alien Sys¬ 
tems, 251 Fairfax Rd., Co¬ 
lumbus, OH 43221. Read¬ 
er Service number 453. 
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Cider Vinegar 


Graphing Grovvth, Fehruary 

I found an errar in thè “Graphing 
Growth” article (Februarv 1983). 
When I ran it, it wouldn’t save thè 
data. Bv changing lines 1430 and 1590 
to D$ = CHR$(4) it worked. 

Karl Horning 
1581 St. Charles 
Lakewood, OH 44107 

Applesoft Adviser, February 

There is a problem in my February 
“Applesoft Adviser” article. The line 
30 GOSUB1000 was added in thè maga- 
zine production process. Written in 
this way, thè program also needs 999 
END to make it work. 

I wanted thè listing to illustrate thè 
use of a data input subroutine. So, 
between thè opening lines of thè 
listing and line 1000, I inserted 
GOSUB 1000 to indicate that this listing 
would be a part of larger program, 
and that thè lines up to 999 would 
contain thè rest of thè program. I as- 
sumed that anyone following this for¬ 
mat would take care not to allow thè 
main program to run into thè subrou¬ 


tine at line 1000. 

To repeat, to get thè program that 
was actually printed in thè February 
issue to work, a new line, 999 END, 
must be added. 

Dan Bishop 
Custom Comp 
PO Box 429 
Buena Vista, CO 81211 

Downgrade Your Apple, February 

I was disappointed to read 
“Downgrade Your Apple” in Febru¬ 
ary’s inCider. Paragraph seven says, 
“After rushing home, I plugged it in¬ 
to thè empty socket on thè RAM 
board and powered up. The screen 
promptly filled with garbage. Some- 
thing had to be wrong. No amount of 
plugging, switching or typing at thè 
keyboard would make anything hap- 
pen. It just did not work.” 

What your author is talking about 
is plugging an Apple old monitor 
ROM into a socket on our MPC AP- 
32 RAM card. That socket, as clearly 
stated in thè accompanying manual, 
is for use with a 2716 EPROM. So 
naturally it did not work. If one puts 
thè old monitor code in a 2716 
EPROM, you may then have both 


monitors available. I have three 
monitors available in my Apple. 

We make a claim in our ads that 
another monitor is available utilizing 
our RAM board. You have published, 
for all to read, that our product fails 
to perform as advertised. 

J. Morton Stong 
MPC Peripherals Corp. 
9424 Chesapeake Drive 
San Diego, CA 92123 

Applesoft Adviser, March 

The Datebook program in thè 
March “Applesoft Adviser” column 
ran fine with no data in thè 1000 to 
7999 section, but I had problems 
when I tried to run it after adding ap- 
pointments. On page 38, your Note 
States you must not use commas or co¬ 
lora in thè Data statement. So I en- 
tered data with no commas between 
thè time and thè description of thè 
appointment. Of course, it only 
works if you separate thè two with a 
comma as shown in your example. In 
other words, your note was mis- 
leading. 

P. J. Hames 
8109 Brandywine 
Beaumont, TX 77706 


INTERSTELLAR DRIVE 

A SOLID STATE DISK EMULATO!? 



TM 1 ] 

J 


Circle 182 on Reader Service card. 




SAVE MONEY! Bas 

Increase your # « 

computerà productivity * ■ 

The INTERSTELLAR DRIVE is a high performance 
data Storage subsystem with independent power 
supply, battery backup, and errar detection. It has 
256KB to 1 Megabyte ofsolid state memory integrated 
to perform with your operating System. 


4g Save valuable time! 

S 'y 5 to 50 times faster 

f performance than floppy disks 
* and Winchester drives 

PION'S INTERSTELLAR DRIVE is designed for use with a 
family of interfaces and software packages. Currently avail¬ 
able are interfaces for IBM, SI00, TRS80, Apple, SS50, and 
most Z80 uP, and software for most popular operating Systems. 
Additional interfaces are continually being developed for thè 
most popular computers. 

Basic Price for 256KB unit [indudes interface and software] 

$1095 m plus tax (where applicable) and shipping ■■■ i 

Visa and Master Card accepted. WWBP !—M HBB 

>wer PION ,INC. Tel.(617)923-8009 

has 101R Walnut St., Watertown, MA 02172 

atea TRS80 trademark of Tandy Corp. Apple trademark of Apple Computers 

Interstellar Drive trademark of PION, Ine. 
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New Products 

edited by Tom Woods 


System Analyzer 

A new interactive micro¬ 
processor in-circuit System 
analyzer designed to facili¬ 
tate 6502 software devel- 
opment is offered by DA- 
TECH Corporation, 92 
Steamwhistle Drive, Ivy- 
land. PA 18974. 

Designed for use by 
electronic designers and 
field personnel, thè System 
analyzer allows thè user to 
quickly examine various 
processor registers, read 
and modify memore loca- 
tions, halt a program at a 
specific address, and work 
through a program one 
step at a time. The 6502 
in-circuit System analyzer 
has an eight-digit hexadec- 
imal display, divided into 
three sections. Price is 
$279. Reader Service 
number 466. 


Fitness Logger 

A miniature personal 
ambulatorv blood pressure 
and ECG recording System 
using a pocket stereo 
recorder and an Apple 
computer is offered by 



The in-circuit System analyzer from DA-TECH Corporation, It is de¬ 
signed to facilitate 6502 software development. 


Vitalcomp Ine., Chanhas- 
sen, MN 55317. 

The Fitness Logger uses 
components such as a stan¬ 
dard blood pressure cuff, 
ECG electrodes, an FM 
record module and an Ap¬ 
ple interface card. An ac- 
companying disk contains 
eight fitness and personal 
history programs and al¬ 
lows thè body signals to be 


presented on thè display in 
thè ECG strip chart for¬ 
mat: heart rate, blood 
pressure wave form, and 
computed svstolic, diastol- 
ic and mean arterial pres¬ 
sure. This data can then be 
compared with past history 
in assessing personal fitness 
development. Price is 
$494.50. Reader Service 
number 474. 


The Wizard 

The Wizard-IPI printer 
interface card extends 
printer capabilities bevond 
simple text printing. Text 
formatting such as variable 
line length, left and right 
margins, page length, per- 
foration skip, and text 
screen dump are support- 
ed. The Wizard-IPI can be 
run with most Apple ex- 
pansion boards. Graphics 
firmware for thè unit is 
contained in an on-board 
personality ROM, elimi- 
nating thè need for any 
special software driver in 
thè operatingSystem. Price 
is $84. Contact Wesper Mi¬ 
crosystems, 3188 Pullman 
St., Costa Mesa, CA 
92626. Reader Service 
number 463. 


Protect Your Apple 

Trace Systems Ine., 1928 
Old Middlefield Way, 
Mountain View, CA 94043, 
offers Station II. a security/ 
protection System for thè 
Apple II. Station II turns 
your Apple, monitor and 
disk drives into a single inte- 



The Fitness Logger from Vitalcomp Ine. measures personal fitti 
development. 


The Wizard-IPI printer interface card from Wesper Microsystems can 
he run with most Apple extension boards. 
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ANOTHER DISCOVERY FOR 

orangeers 

THE ORANGEPEELT 

POWERFUL. EXPANDABLE. 
AT $790, REMARKABLE. 



Yesterday. buying a 
computer meant compromising. 
Powerful units carried powerful prices 
Affordable units were little more than 
toys. 

Today, there s thè ORANCEPEEL. 

The powerful, expandable, highly 
versatile microcomputer priced 
at a remarkable $790. 

• FULLY APPLE II " COMPATIBLE. 

• LANCUAGE FLEXIBILITY — 

Modular design permits thè use 
of all disc based Apple II software, 

CP/M; UCSD-p* 

• MULTIPLE CPU s (as available). 


U.S.A. Distributor 
Compusource Ine. 

3112 Hennepin Avenue South 
Minneapolis, Minn. 55408 
612-827-2951 


• 76K RAM. 

• DISC BASED - requiring standard Apple il drive. 

• DETACHED KEYBOARD - Full ASCII 
upper and lower case. 

• HIGH AND LOW RESOLUTION B/W GRAPHICS 

• 3 I/O SLOTS EXPANDABLE TO 7. 

• ORANGE BUS FOR INTERNAL EXPANDABILITY. 

• 6 MONTH REPLACEMENT WARRANTY — 
(Extended one year optional). 

THE ORANGEPEEL COMPUTER. 

we anticipate thè future. 

See your locai ORANGE dealer today 


Apple II Is a reqlstered trademark of Apple Compufers ine 
CP/M Is a trademark of Digital Research ine 
•UCSD-p is a trademark of The Regents of The university of 
California 
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Citcle 153 oiì Reader Service card. 


Available in Canada. USA. 
Hong Kong. Singapore. Australia and lapan 



Circle 39 on Reader Service card. 


-New Products- 



FINALLY! I 

A SCENE 
UTILITY THAT 
REALLY DOESALL! 


PAINT MASTER allows line drawing, 
scene painting, scene editing, screen 
compression. Fastest color-fill routines 
anywhere, with over 300 colors / 
patterns. 28 pages of detailed documen- 
tation. Perfect for adventure game 
creation or computer art. Use crea- 
tions in your own programs. No 
Royalties required. $34.95 

Requires Apple® Il Plus 48K 


AVANT-GARDE CREATIONS 
P.O. BOX 30160 
Eugene, OR 97403 


(503) 345-3043 




The Model 8352-D A, B, C switches from Electro Standard s Laboratori). 


grated work station. Con- 
necting these components 
into Station II's built-in 
power switch clears your 
desk of electrical cords and 
cables and helps protect thè 
computer troni power 
surges. When Station II is 
bolted to a desk, your Apple 
can be locked inside using 
thè key provided. Price is 
$129. Reader Serv ice num- 
ber 462. 


T/OM-T 


Discwasher 

Discwasher disk drive 
cleaner uses a fiber grid 
cleaning System to dis¬ 
lodge and collect foreign 
matter from sensitive disk 
drives. The self-contained 
cleaning disk requires no 
fluids and is loaded into 
thè drive like anv disk. It is 
available in both 514-ineh 
and 8-inch formats. Price 
is $19.95 for thè 514-inch 
format and $24.95 for thè 
8-inch format. Contact 
HWH Enterprises Ine., 16 
East 52 St., New York, NY 
10022. Reader Service 
number 471. 


Model 8352-D RS-232 
A,R,C switches. Roth 
models are designed to im¬ 
prove computer room effi- 
ciency bv providing thè ca- 
pability to share one com¬ 
puter port among three 
peripherals. The produets 
allow three terminals to use 
one I/O port, three CPUs 
to share one printer, or 
three terminals to share 
one modem. The 8351-D is 
$160, and thè 8352-D is 
$180. Reader Service num¬ 
ber 464. 


A,B,C Switches 

Electro Standards 
Laboratory Ine., Box9144, 
Providence, RI 02940, of- 
fers Model 8351-D and 


Select-A-Port 

TG Products, 1104 Sum¬ 
mit Ave., Suite 110, Plano, 
TX 75074, offers Select-A- 
Port, an Apple II accessory. 
The Select-A-Port plugs in¬ 
to a single socket of thè Ap¬ 
ple and provides thè com¬ 
puter with five switch- 
selectable sockets that can 
be used with joysticks, track 
balls and game paddles. 

Three of thè sockets are 
isolated by diodes to pre- 
vent device-to-device in- 
terference. The fourth 
socket modifies a joystick, 
track ball or paddle con¬ 
troller to operate as a sec- 
ond unit in a multiplayer 
game. And thè fifth socket 
has no isolation circuitry 
and is designated for 
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Transtar 315 

Color Printer f or only $599 


• New technology four-hammer print head 

• Unique diagonal ribbon provides simpler and more reliable operation 

• Prints 7 colors plus more than 30 shades 

• All colors and shades are printed in a single pass of thè print head 

• Built by Seikosha, thè oldest manufacturing company of thè 

famous Seiko group—providing precision products since 1892. 


Transtaf • BoxC-96975 Bellevue, Washington 98009 

Circle 265 on Reader Service card. 











Circle 324 on Reader Service card. 


New Products 


STOP WASTING HALF OF YOUR 



Doublé your Diskette capacity by adding a second wrlte 
protect notch — Perfectly, every tìme — with thè new 


ALDERPUNCH. 


At just S29.95 (plus SI.75 for shipping, handling, and In¬ 
surance) thè premium quality Alderpunch will pay for itself 
with your first box of Diskettes. Plus, our one-year uncondi- 
tional warranty is your assurance of absolute satisfaction. 


5V*" soft sector diskettes only (ie: Apple ll/lll. Commodore. Future Data, TI) 


ALDERSHOT’S 
1103 High Vista Drive 
Richardson, Texas 75080 


Fili out this coupon & mail today 

YES, Send me_Alderpunches today! 


IC483 


Name: 


Address: _ City: _ 

State: _ Zip_ 

Enclosed is a check or money order for S29.95 for each 
Alderpunch plus SI.75 for shipping, handling and in- 
surance. Texas residents must add 5% sales fax. 

ALDERSHOT’S / 1 103 High Vista Dr. / Richardson. Texas 75080 



The cali for authors is out! 


Wayne Green Books announces a 
July 1, 1983 deadline for submitting 
manuscript proposals for thè upcom- 
ing publication list. Ideas for book- 
length manuscripts about any micro- 
computer System or area of electron- 
ics will be considered. In addition to 
payment and royalties, we offer our 
distribution channels and thè market¬ 
ing support your hook deserves. 

Send proposals or requests for a 
copy of our Writer’s Guide to: 

Editor, Wayne Green Books 
Peterborough, NH 03458. 

Or cali toll-free 1-800-343-0728. 



The Transtar 315 rnlor printer. 


highly selective devices. 
Price is $59.95. Reader 
Service number 472. 


Q-Pac 

Microtek Ine., 9514 
Chesapeake Drive, San Di¬ 
ego, CA 92123, offers 
Q-Pac for Apple II and II 
Plus users. Q-Pac is de- 
signed to work with Visi- 
Cale and other programs 
that require additional 
memory; 80-column dis¬ 
play; and disk emulation 
that operates about 100 
times faster than standard 
disk drives. 

Q-Pac consists of a 128K 
disk emulation system with 
on-board firmware; an 80- 
column screen card; and a 
software program used in 
conjunction with VisiCalc. 
Price is $699. Reader Ser¬ 
vice number 470. 


Transtar Printers 

Transtar, Box C-96975, 
Bellevue. WA 98009. offers 
thè Transtar 130, a daisv- 
wheel printer that is com¬ 
patibile with all word pro¬ 
cessing software. The 130 
prints fully-formed charac- 
ters, bidirectionallv, at 16 
cps. Cartridge ribbons are 
available in cloth, or single 
and multistrike inviar film. 


The 96-character plastic 
print wheels come in pica, 
elite and proportional 
styles. Price is $895. 

Transtar also offers a 
color printer, Transtar 
315. The 315 uses a four- 
hammer head with a rotat- 
ing platen. Each of thè four 
hammers prints only one of 
four primary colors so that 
any of thè over 30 possible 
shades can be printed with 
a single pass of thè printer 
head. Price is $599. Reader 
Service number 460. 


Dirt Cheap 

The Dirt Cheap video 
interface card connects thè 
Apple II or Apple II Plus to 
a monitor or TV set with 
an rf modulator, and pro- 
vides a 64-column display 
in addition to thè Apple 
li s standard 40-column 
display. 

Dirt Cheap permits user 
selection of normal or in¬ 
verse text and features line¬ 
ar memory mapping and 
replaceable character sets. 
It understands most stan¬ 
dard Applesoft and Integer 
Basic screen commands as 
well as Apple Pascal com¬ 
mands that work on an Ap¬ 
ple II. Price is $89. Contact 
Advanced Logic Systems, 
1195 Arques Ave., Sunny- 
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Circle 321 on Reader Service card. 



The PSIO dual function interface card. 

vale, CA 94086. Reader Price is $299. Reader Ser- 
Service number 468. vice number 469. 


Interface Card 

Videx Ine., 897 N.W. 
Grant Ave., Corvallis, OR 
97330, offers thè PSIO 
dual function interface 
card. A printer and mo¬ 
dem, or any other com- 
bination of parallel/serial 
peripherals, can be indi- 
vidually connected to and 
controlled by thè PSIO. It 
is compatible with Basic 
and Pascal, and with thè 
CP/M operating system, 
and includes a non-volatile 
ROM that remembers 
baud rate configurations 
and software selectable 
configuration options. 


Connector Matrix 

The Rit RS-232 Connec¬ 
tor Matrix permits mating 
of any two RS-232 con- 
nectors. It eliminates thè 
need to fabricate special 
cables or resolder existing 
cable wiring to achieve a 
signal interface between 
two units. It is a tool for 
cable pin number cross 
connections, gender con¬ 
nector changes, and diag- 
nostic troubleshooting. 
Price is $89. Contact Rit 
3 Computer Corporation, 
8120 Penn Ave. South, Min¬ 
neapolis, MN 55431. Read¬ 
er Service number 467. 
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The Bit RS-232 Connector Matrix from Bit 3 Computer Corporation. 
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ADVANCED TELECOMMUNICATIONS 
FOR THE APPLE II AND THE APPLE Ile 
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Ominitec Data announces "Omnilink 1200 Communi¬ 
cations Package," which consists of a 300/1200 baud 
full duplex modem, Model 5212,a telecomminications 
card, and a software package called Softlink.This pack¬ 
age is compatible with all major packet switching net- 
works (eg. Tymnet, Telenet, and Uninet,) and regular 
phone lines. Uploading and downloading of files may 
be done at 1200 baud. Most other packages that 
support 1200 baud requires a hard disk, but this pack¬ 
age will operate with any Apple II with 48K ram,one 
disk drive, and a monitor. 

Omnilink also operates with a Videx 80 col. card, al- 
though it is not necessary. Before purchasing any other 
product of this kind, serious consideration should be 
given to this hardware and software. 

A-C-C-E-S-S *VIDACCESS* 

Start your own electronic network or Online data base, 
or electronic mail System. 

*Vidaccess* permits you to haveyour own Online elect¬ 
ronic database. This software used with thè Omnitec 
modem enables other usersto access your online Service 
from other microcomputers at both 300 and 1200 
baud. *Vidaccess* supports Xon/Xoff protocol for 
both uploading and downloading on other *Vidaccess*, 
A-C-C-E-S-S Systems, other online data bases, such as 
The Source, CompuServe, Dow Jones, Dìalog, Delphi, 
and others. 

As with 'Vidaccess*, A-C-C-E-S-S also permits electro¬ 
nic mail, automatic send with a clock card, online data 
base access, auto-dial/auto-answer. As with ‘Vidaccess*, 
absolutely no prior computer or programming know- 
ledge is required. 

— ANNOUNCING — 

FREE ONLINE INFORMATION DATA BASE 

DELPHI is thè information, Communications & enter¬ 
tainment System that takes your home computer far 
beyond thè limitations of disks or cartridges. With a 
simple phone cali, you can get thè latest news, weather 
& sports, check thè stock, commodities & money mar- 
kets, do your banking, go shopping, post messages on 
an electronic bulletin board, send & receive electronic 
mail, "talk" with other subscribers, or you can go to 
thè library & use a 20,000entry encyclopedia or access 
an enormous research library, which has a collection of 
200 separate databases with comprehensive information 
on just about everything, and a search feature that 
makes it easy to get thè information you want. This is 
what thè "information explosion" is all about. Also, 
on DELPHI, you can send mail to subscribers of The 
Source*, CompuServe* & other Services. All you need 
besides your computer is a modem. Unlike other Sys¬ 
tems, DELPHI is compatible with all. For $49.95,you 
will get a permanent subscription to DELPHI, an easy- 
to-use handbook, all updates & a subscriber newsletter. 
Online Service is as little as $5.00 per hour. Inaddition, 
we carry all major brand modems, & Communications 
software. Also, as a BONUS, we will furnish you with 
a FREE membership with DELPHI when you purchase 
from us one of these modems or software packages. 
Send for more information & brochures. Or, send only 
$49.95 and start DELPHI now. We accept all major 
credit cards, checks, money orders & c.o.d. 

TEXAS MICRODATA SYSTEMS, INC. 

1414 Texas Building 
Fort Worth, Texas 76102 
(817) 877-1087 

Cali Toll Free 800-228-2028, Ext. 730 
24 Hrs. a Day - Including Sunday 
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A PRACTICAL 
& EASY METHOD 
FOR LEARNING 
(OR BRUSHING-UP ON) 
SPANISH USED DY TRAVELERS. 


ADVENTURE, FUN, EDUCATION, and history ore oli 
reosons people travel to other countries. The problem is, 
when traveling to countries where little or no English is 
spoken, how to communicate. By spending a few hours 
with Spanish for thè Traveler, you con gain o basic 
understonding of Spanish ond ot thè some time provide 
yourself with o MAGIC KEY which will open doors to thè 
locai culture not normally available to thè overage 
traveler. In o Lotin country, onyone who tries to speak 
thè Language is olmost olwoys treoted with o smile ond 
warmth by thè people of thot country. The way to goin 
this edge is to practice Spanish with Spanish for thè 
Traveler before your trip ... 

Becouse: 

• It's o quick and eosy woy to learn Spanish useful in 
traveling. 

• It's on opportunity to learn some of thè basics of 
Spanish without thè necessity of ottending dosses, 
lectures or listening to endless records. 

• It's presented in o manner which cotches your interest 
immediately ond encouroges you to continue building 
your Spanish vocobulory. 

• It provides you with thè essentials of Spanish necessary 
to moke your trip os enjoyoble os possible. With em- 
phosis on Spanish required for Your Arrivai, Shopping 
for Souvenirs, Seeing thè Sights, Touring thè Country, 
Dining Out and Getting Acquainted, olmost every 
situotion is covered. 

Available for thè IBM P.C. and Apple II, Il +, Ile. 


PACKAGE INCLUDES, 

Diskette, 4 Audio Cossettes, 
ond Take-Along Manual. 


PRICE: $59.95 

(California Residents add 6% Sales Tax) 
Plus $2 50 Shipping 
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New Products 


Drive Signal Monitors 
ADASI drive signal 
monitors measure drive 
line status and computer 
power. They prò vide LED 
status indication of all lines 
connecting thè floppy drive 
to thè computer and in¬ 
dicate thè power supplv 
voltages to assure safe com¬ 
puter operation. They also 
display thè status of all 
lines for System analysis. 
The ADASI I is designed 
for internai drive connec¬ 
tion, and thè ASASIII and 
III are designed for their 
respective drives and exter- 
nal connection. ADASI I is 
$59.50; models II and III 
are $139.50 and $149.50. 
Contact Terry Electronic 
Assembly Company, Box 
E, 2117 Òhio St., Michigan 


City, IN 46360. Reader 
Service number 473. 


CP/M Card 

The CP/M Card from 
Advanced Logic Systems 
and Digital Research is an 
interface card that plugs 
into anv Apple Ile com¬ 
puter, permitting thè user 
to run over 3000 CP/M- 
compatible application 
programs. The CP/M Card 
contains CP/M Plus, thè 
most recent and powerful 
version of CP/M. The Card 
provides 128K of usable 
memorv with CP/M Plus. 
Contact Advanced Logic 
Systems, 1195 East Arques 
Ave., Sunnyvale, CA 
94086. Price is $399. Read¬ 
er Service number 461. 



The ADASI drive signal monitor from Terry Assembly Company Ine. 





TURBOCHARGE YOUR APPLE 


With The Quentin 500 Winchester Disk Drive 
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When you're ready to go thè distance, thè Quentin 500 
is thè high density, high speed Winchester subsystem that 
can fuel your Apple into a first-class powerhouse. 

It's Deep. Store and retrieve 5, 10, 15 even 20 
megabytes of formatted data on a single drive. With 20 
megabytes of juice, you've got thè equivalent of 140 
conventional floppy disks, 4800 fuli pages of text, or all 
thè financial fiìes of a $50 miiìion business. 

it's Fast. The Quentin 500 accelerates from 0 to Read 
in 70 MS. And thè DMA data transfer rate zips along at 5 
MBits per second. 


assembled, and is fully tested on Apple operating 
systems. And thè Q-500 has a full one-year factory warranty. 

It's Compatible and Apple-Beige. Plug it into 
your favorite Apple, and shift into full power. Software 
support packages provided to ensure complete compati- 
biiity with DOS, CP/M, Pascal and protected software. 

And It's Very Affordable. The Quentin 500 is 
thè fìrst premium quality Winchester subsystem offered at 
a price ali businessman, professional corporations and 
serious computer users can afford. 


It's Accurate. The Quentin 500 moves out in front 
with thè remarkable new Disk Drive Self Test Diagnostic 
System, Flick a switch and thè 500 runs through its paces 
checking all Winchester operating functions, and verify- 
ing thè integrity of thè drive and thè data. While thè 
controllerà full 32 bit Error Correction Code overrides all 
data field errors. 

It's Reliable. Whether you're on-iine all day, 
or driving in short, fast sprints, thè Quentin 500 is 
strictly high performance. MTBF 10,000 
power-on hours, with no preventive 
maintenance required. 

Every Quentin 500 is delivered com- 


Count On Quentin For Quality. Quentin Re 
search has been designing and building mass Storage 
subsystems for corporate users for five years. That's quite 
a few times around thè track. 

We've put those five years to good use by developing 
state-of-the-art disk technoiogy for business and personal 
use, and by building a reputation for reliable 
Products and stable management. 

The Hotline to our Product Support Manager is 
open every week day for information on our full 
product line. When you're ready to 
expand your computer's capabilities, 
turbocharge with thè Quentin 500. It's 
an information powerhouse. 
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^■"■RESEARCH, INC 


• Apple is a registered trademark Apple Computer, Ine. 


19355 Business Center Drive 
Northridge, CA 91324 
(213) 701-1006 • Telex 910-493-2174 


To Order Check, money order, Visa or MasterCard 
number. Calif. residents add 6% sales tax. 
AuthOrized cinto discount^ avariatole. Cali or wrrte 
■for Quentin 500 Specifications and Features, 


Circle 30 on fieader Service card. 
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MORE THAN JUST AHOTHER PREITY FACE. 


Says who? Says ANSI. 

Specificaily, subcommittee X3B8 of thè American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed thè specs 
required to meet or exceed all their standards. 

But just who is "subcommittee X3B8" to issue such 
pronouncements? 

They’re a group of people representing a large, 
well-balanced cross section of disciplines—from 
academia, government agencies, and thè computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com¬ 
puter Programmers and Analysts. In short, it’s a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 


make life miserable for everyone in thè disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under thè full moon) to concoct more 
and more ruies to increase thè quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages—listing, and insisting upon—hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you’d like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI... 

We think you’ll want us to make some Elephants 
for you. 


ELEPHAHL HEAJfY DUTY DISKS. 

For a free poster-size portrait of our powerful pachyderm, please write us. 

Distributed Exclusively by Leading Edge Products, Ine., 225 Turnpike Street, Canton, Massachusetts 02021 
Cali: toll-free 1-800-343-6833; or in Massachusetts cali collect (617) 828-8150. Telex 951-624. 




